type 'a t = ('a, string) result Io.M.t
val return : 'a -> 'a t
val bind : 'a t -> ('a -> 'b t) -> 'b t
val (>>=) : 'a t -> ('a -> 'b t) -> 'b t
val (=<<) : ('a -> 'b t) -> 'a t -> 'b t
val (>>) : 'a t -> 'b t Lazy.t -> 'b t
val fmap : ('a -> 'b) -> 'a t -> 'b t
val (>|=) : 'a t -> ('a -> 'b) -> 'b t
val seq : 'a t list -> 'a list t
type 'a u = 'a Io.M.t
module E : sig ... end
val fail : E.t -> 'a t
val lift : 'a u -> 'a t
val lift_opt : 'a option -> 'a t -> 'a t