Streams.map (g . f) === Streams.map f >=> Streams.map g Streams.map id === Streams.makeInputStream . Streams.read
Streams.mapM (f >=> g) === Streams.mapM f >=> Streams.mapM g Streams.mapM return === Streams.makeInputStream . Streams.read
Streams.contramapM (f >=> g) = Streams.contramapM g >=> Streams.contramapM f Streams.contramapM return = return