Of_monad2.M
type ('a, 'b) t
val to_monad : ('a, 'b) t -> ('a, 'b) Monad.t
val of_monad : ('a, 'b) Monad.t -> ('a, 'b) t