module type S =sig..end
type ('k, +'v, 'cmp) map
type ('k, +'v, 'cmp) tree
module Key:Comparator.S
module Tree:sig..end
type'at =(Key.t, 'a, Key.comparator) map
include Core_map_intf.Creators_and_accessors1
val t_of_sexp : (Sexplib.Sexp.t -> 'a) -> Sexplib.Sexp.t -> 'a tval sexp_of_t : ('a -> Sexplib.Sexp.t) -> 'a t -> Sexplib.Sexp.tval compare : ('a -> 'a -> int) -> 'a t -> 'a t -> int