(let ((count 0))
	   #'(lambda () (+ 2 count)))

(let ((count 0))
	   #'(lambda () (incf count)))