Prelude> doubleMe x = ((+) x x)
Prelude> ((doubleMe) 21)
42
Prelude> doubleUs x y = ((+) ((doubleMe) x) ((doubleMe) y))
Prelude> ((doubleUs) 5 20)
50
Prelude> doubleSmallNumber x = (if ((>) x 100) then x else ((*) x 2))
Prelude> ((doubleSmallNumber) 100)
200
Prelude>