hasufell/haskell-lectures
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Add case...of code

Browse Source
This commit is contained in:
Julian Ospald 2015-04-21 14:14:24 +02:00
parent 9dc7adaaf3
commit 5b4be12e0b
No known key found for this signature in database
GPG Key ID: 220CD1C5BDEED020
1 changed files with 6 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
common/code/Code.hs
View File

@ -51,3 +51,9 @@ addTwo (x:xs) = (x + 2) : addTwo xs
f'' :: String -> Bool f'' :: String -> Bool
f'' xs = even . length . (\x -> x ++ "Hello world") $ xs f'' xs = even . length . (\x -> x ++ "Hello world") $ xs
g :: Int -> Bool
g x = case x - 2 of
2 -> True
5 -> True
x -> False