Of_monad_indexed.M
type ('a, 'i, 'j) t
val to_monad : ('a, 'i, 'j) t -> ('a, 'i, 'j) Monad.t
val of_monad : ('a, 'i, 'j) Monad.t -> ('a, 'i, 'j) t