module Pretty (
    (.$)
  ) where

(.$) :: (a -> b) -> (b -> c) -> (a -> c)
(.$) f g = g . f