(define (hello who)
  (format #t "~A ~A!\n"
          "Hello" who))