;; list test 2 (bind-func lt2 (lambda () (let ((l1 (Cons 1 (Cons 2 (Nil)))) (l2 (fmap (lambda (x) (* x x)) l1))) (println 'l2 '= l2))))