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>