Module Fold_lib.Fold

type ('a, 's) fold = init:'s -> f:('s -> 'a -> 's) -> 's
type 'a t = {
  1. fold : 's. ('a, 's) fold;
}
val concat : 'a t t -> 'a t
val concat_map : 'a t -> f:('a -> 'b t) -> 'b t
val init : Core_kernel__Int.t -> f:(Core_kernel__Int.t -> 'a) -> 'a t
include sig ... end
val (>>=) : 'a t -> ('a -> 'b t) -> 'b t
val (>>|) : 'a t -> ('a -> 'b) -> 'b t
module Monad_infix : sig ... end
val bind : 'a t -> f:('a -> 'b t) -> 'b t
val return : 'a -> 'a t
val map : 'a t -> f:('a -> 'b) -> 'b t
val join : 'a t t -> 'a t
val ignore_m : 'a t -> unit t
val all : 'a t list -> 'a list t
val all_unit : unit t list -> unit t
module Let_syntax : sig ... end
val to_list : 'a t -> 'a list
val of_list : 'a list -> 'a t
val of_array : 'a array -> 'a t
val sexp_of_t : ('a -> Sexplib0__.Sexp.t) -> 'a t -> Sexplib0__.Sexp.t
val compose : 'a t -> 'a t -> 'a t
val (+>) : 'a t -> 'a t -> 'a t
val group3 : default:'a -> 'a t -> ('a * 'a * 'a) t
val string_bits : string -> bool t
val bool_t_to_string : bool t -> string
val string_triples : string -> (bool * bool * bool) t