on d82d607 help sign in
27 lines 395 B history raw
1foo :: Int -> Int
2foo x
3 | x == 5 = 10
4 | otherwise = 12
6bar :: Int -> Int
7bar x
8 | x == 5 =
9 foo x +
10 foo 10
11 | x == 6 =
12 foo x +
13 foo 20
14 | otherwise = foo 100
16baz :: Int -> Int
17baz x | x < 0 = x
18baz x | otherwise = x
20multi_baz :: Int -> Int
21multi_baz x | x < 42 = x
22multi_baz x | x < 0 = x
23multi_baz x | otherwise = x
25quux :: Int -> Int
26quux x | x < 0 = x
27quux x = x