module Main where main = putStrLn ("Hi " ++ foo 2 ++ "!") foo x = bar x 3 foo x = bar x 3 b 22 3 = 22 + 3 b x _ = x bar x y = show (b x y)