home |
Prelude> putStrLn "Hello world!" Hello world!
Prelude> putStr "Hello" >> putStrLn " world!" Hello world!
Prelude> getLine This is a pen. "This is a pen."
Prelude> getLine >>= putStrLn hello hello
Prelude> getLine >>= (\ str -> if str=="Hi" then putStrLn "Hello" else putStrLn "Pardon?") Hi Hello
reply str = if str=="Hi" then putStrLn "Hello" else putStrLn "Pardon?" call = getLine >>= reply
*Main> call Hi Hello