
-- Monad composition
--
--  (>@>)  binary composition
--  sequ   composition of a list of monadic functions
--  
(>@>) :: Monad m => (a -> m b) -> (b -> m c) -> a -> m c
f >@> g = (>>= g) . f


(>@>) :: Monad m => (a -> m b) -> (b -> m c) -> a -> m c
f >@> g = (>>= g) . f
f >@> g = (>>= g) . f