> (free-vars '((lambda (x) x) y)) (y) > (bound-vars '((lambda (x) x) y)) (x) > (free-vars '(lambda (x) (y (lambda (y) (y z))))) (y z) > (bound-vars '(lambda (x) (y (lambda (y) (y z))))) (y)