;;; Simple Scheme let/let*-expressions.
;;;
;;; let x = 2, y = 3 in
;;;     (let x = x+1, y = (let z=3 in x+y+z)  ;;; x ==> 3, y ==> 8 (not 9)
;;;      in (x+y)                             ;;;   ==> 11
;;;  )

(define f ;;; f ==> 11
  (let ((x 2) (y 3))
    (let ((x (+ x 1))
          (y (let ((z 3)) (+ x y z))))
      (+ x y))))

(define g ;;; g ==> 12
  (let ((x 2) (y 3))
    (let* ((x (+ x 1))
           (y (let ((z 3)) (+ x y z))))
      (+ x y))))