(define (func x)
	(display x) (newline)
	(let ([x (+ x 1)])
	     (display x)))

(func 42)