(let ((var a int 0)) (begin (= a (+ a 1)) a))