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