(define make-adder (lambda (x) (lambda (y) (+ x y)))) (define add-2 (make-adder 2)) (define add-3 (make-adder 3)) (add-2 5) ; ==> 7 (add-3 5) ; ==> 8 (add-2 12) ; ==> 14