{-# LANGUAGE TemplateHaskell #-}
module Main where

import THPatTest

main :: IO ()
main =
  do print (foo 1 2, bar 1 2, baz)
     print ($foo' 1 2, $bar' 1 2, $baz')