val bind : 'a t -> ('a -> 'b t) -> 'b tval map : ('a -> 'b) -> 'a t -> 'b tval iter : ('a -> unit t) -> 'a list -> unit tval fold_left : ('acc -> 'a -> 'acc t) -> 'acc -> 'a list -> 'acc tval concat_map : ('a -> 'b list t) -> 'a list -> 'b list tmodule Infix : sig ... end