include Core.Monad.S with type 'a t := 'a t
val (>>=) : 'a t -> ('a -> 'b t) -> 'b tval (>>|) : 'a t -> ('a -> 'b) -> 'b tval bind : 'a t -> f:('a -> 'b t) -> 'b tval map : 'a t -> f:('a -> 'b) -> 'b tval join : 'a t t -> 'a tval ignore_m : 'a t -> unit tval all : 'a t list -> 'a list tval all_unit : unit t list -> unit tval output : out_channel -> buf:bytes -> pos:int -> len:int -> unitval print_string : string -> unitval fold_left : 'a Core.List.t -> init:'b -> f:('b -> 'a -> 'b t) -> 'b tval stdout_isatty : unit -> bool tval capable : unit -> bool t