blob: 531478da48abbbb82f249dbefad81f63bf124f2a (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
module LayoutIn4 where
--Layout rule applies after 'where','let','do' and 'of'
--In this Example: rename 'ioFun' to 'io'
main = io "hello" where io s= do let k = reverse s
--There is a comment
s <- getLine
let q = (k ++ s)
putStr q
putStr "foo"
|