Module Monad_infix = Monad.Monad_infix

val (>>=) : 'a list -> ('a -> 'b list) -> 'b list

val (>>|) : 'a list -> ('a -> 'b) -> 'b list