`functor (X : Basic) ->
sig
val ( >>= ) : 'a X.t -> ('a -> 'b X.t) -> 'b X.t
val ( >>| ) : 'a X.t -> ('a -> 'b) -> 'b X.t
module Monad_infix :
sig
val ( >>= ) : 'a X.t -> ('a -> 'b X.t) -> 'b X.t
val ( >>| ) : 'a X.t -> ('a -> 'b) -> 'b X.t
end
val bind : 'a X.t -> ('a -> 'b X.t) -> 'b X.t
val return : 'a -> 'a X.t
val map : 'a X.t -> f:('a -> 'b) -> 'b X.t
val join : 'a X.t X.t -> 'a X.t
val ignore_m : 'a X.t -> unit X.t
val all : 'a X.t list -> 'a list X.t
val all_ignore : unit X.t list -> unit X.t
end`