var src = "(begin (define bank-account (let ((amount 1000)) (lambda (n) (set! amount (+ amount n)) amount))) (bank-account 2000) (bank-account -2500))";