learn-you-a-haskell-for-gre.../baby.hs
2017-05-01 22:06:40 -07:00

10 lines
283 B
Haskell

-- baby.hs
-- Eryn Wells <eryn@erynwells.me>
-- Simple functions
doubleMe x = x + x
doubleUs x y = doubleMe x + doubleMe y
boomBangs xs = [if x < 10 then "BOOM!" else "BANG!" | x <- xs, odd x]
-- List comprehensions
triangles = [(a,b,c) | c <- [1..10], b <- [1..10], a <- [1..10]]