;; do a odd (+ (* 3 n) 1), even (/ 2 n) ;; and use closures to do it! (define (generator n) (lambda (m) (set! n (+ 1 n)) (* m n))) (define thunk (generator 5)) (thunk 10)