module Do where

main :: Fay ()
main = do putStrLn "Hello,"; putStrLn "World!"