main = do
    putStrLn foo
    where foo = "Hello, Cruel World!"