(print!
  ((case 'baz
    (foo (lambda (x) (+ x 1)))
    (bar (lambda (x) (+ x 2))))
    3))