Module ListM.Infix

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