(let ([a (lambda (x) (- 8 x))]
      [b (lambda (x) (+ 5 x))])
  (let
      ([a (lambda (x)
	    (if (< x 30)
		(b (+ 9 x))
		(+ 100 x)))]
       [b (lambda (x) (a (+ 4 x)))])
    (b 3)))