(let ((make-adder (lambda (x)
                    (lambda (y)
                      (+ x y)))))
  ((make-adder 4) 5))