doubleMe x = x + x

doubleUs x y = doubleMe x + doubleMe y

doubleSmallNumber x = if x > 100
                      then x
                      else x*2

doubleSmallNumber' x = (if x > 100 then x else x*2) + 1

-- boom bangs, ya heard???
boomBangs xs = [ if x< 10 then "BOOM!" else "BANG!" | x <- xs, odd x]