1. -- run in ghci
  2.  
  3. let fc f g = g . f
  4. :t fc (map ((+) 1)) (filter (\a -> a == 0))
  5. :t (map ((+) 1)) $ (filter (\a -> a == 0))