blob: 900d6daf632af492d8c61d8473333c0ea23062da (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
|
module LayoutIn3 where
--Layout rule applies after 'where','let','do' and 'of'
--In this Example: rename 'x' after 'let' to 'anotherX'.
foo x = let anotherX = 12 in (let y = 3
z = 2 in anotherX * y * z * w) where y = 2
--there is a comment.
w = x
where
x = let y = 5 in y + 3
|