Up

module Misc

: sig
#
val o2s : 'a option -> ('a -> string) -> string
#
val single : 'a list -> 'a
#
val mapd : ('a -> 'b * 'b) -> 'a list -> 'b list
#
val tabulate : int -> (int -> 'a) -> int -> 'a
#
val tabulateb : int -> (int -> bool) -> (int -> bool) * int
#
val tabulatef : ('a -> int) -> ((unit -> 'a -> unit) -> unit -> unit) -> int -> 'b -> ('a -> 'b) -> 'a -> 'b
#
val tabulateo : ('a -> int) -> ((unit -> 'a -> unit) -> unit -> unit) -> int -> ('a -> 'b option) -> ('a -> 'b option) * int
#
val truncate : int -> 'a list -> 'a list
#
val repeat : int -> 'a -> 'a list
#
val ($$) : 'a -> ('a -> 'b) -> 'b
#
module IntSet : Set.S with type elt = int
#
val separated_list_to_string : ('a -> string) -> string -> 'a list -> string
#
val index_map : 'a StringMap.t -> (int -> 'a) * (string -> int) * (int -> string)
#
val support_assoc : ('a * 'a) list -> 'a -> 'a
#
val index : string list -> int * string array * int StringMap.t
#
val materialize : ('a, 'a option) Hashtbl.t -> 'a -> 'a list
#
val iteri : int -> (int -> unit) -> unit
#
val foldi : int -> (int -> 'a -> 'a) -> 'a -> 'a
#
val foldij : int -> int -> (int -> 'a -> 'a) -> 'a -> 'a
#
val mapi : int -> (int -> 'a) -> 'a list
#
val qfold : ('a -> 'b -> 'a) -> 'a -> 'b Queue.t -> 'a
#
val qiter : ('b -> unit) -> 'b Queue.t -> unit
#
val smap : ('a -> 'a) -> 'a list -> 'a list
#
val smapa : ('b -> 'a -> 'b * 'a) -> 'b -> 'a list -> 'b * 'a list
#
val normalize : string -> string
#
val postincrement : int Pervasives.ref -> int
#
val gcp : string -> string -> string
#
val gcps : string list -> string
#
val array_forall : ('a -> bool) -> 'a array -> bool
end