-- Take your age. -- Subtract 2. -- Then add 2. -- That's your age. age x = ($) ((.) `foldl` id) [(-2+), (2+)] $ x
(-2+)