t/t4034/scheme/post

   1 (define (my-func first second)
   2   ; This is a (moderately) cool function.
   3   (that\place (+ 3 4))
   4   (define |a greeting| "hello")
   5   (let ((c (add1 first)))
   6     (format "one more than the total is %d" (+ c second))))