| 123456789101112131415161718192021 |
- module PRINT3 where
- putstr = putStr
- putstrln = putStrLn
- mygreeting :: String
- mygreeting = "hello" ++ " world!"
- hello :: String; hello = "hello"
- world :: [Char]; world = "world"
- main :: IO ()
- main = do
- putstrln ""
- putstrln mygreeting
- putstrln secondgreeting
- where secondgreeting =
- concat [hello, " ", world, "!"]
- putstrln integerlists
- where integerlists =
- concat [[1, 2], [3, 4, 5], 6, [7, 8], [9]]
|
