Module Util_pure

module BatMap_real := BatMap
type 'a rresult := ('a, Rresult.R.msg) Rresult.R.t
module BatMap : sig ... end
module List : sig ... end
module Option : sig ... end
module Result : sig ... end
module Set : sig ... end
module String : sig ... end
val table_map_as_pairs : (('a * 'b) -> 'c) -> ('a, 'b) BatMap_real.t -> 'c list
val id : 'a -> 'a
val compose_right_all : ('a -> 'a) list -> 'a -> 'a
val spinner : unit -> 'a -> string
val english_plural : string -> int -> string
val english_plural' : string -> int -> string
val mk_absolute_path : string -> string -> string