Test.hs:28:48:
    Couldn't match `Char' against `()'
      Expected type: [Char]
      Inferred type: [()]
    In the application `mapM_ putStrLn lower'
    In the second argument of `(++)', namely `(mapM_ putStrLn lower)'