module Tree : sig ... endinclude Map_intf.S_plain with module Key := Key and module Tree := Tree
type +'a t = (Key.t, 'a, Key.comparator_witness) Map_intf.Map.t
include Map_intf.Creators_and_accessors1 with type 'a t := 'a t with type 'a tree := 'a Tree.t with type key := Key.t with type comparator_witness := Key.comparator_witness
include Map_intf.Accessors1 with type 'a t := 'a t with type 'a tree := 'a Tree.t with type key := Key.t with type comparator_witness := Key.comparator_witness
include Map_intf.Map.Accessors1 with type comparator_witness := Key.comparator_witness and type key := Key.t and type 'a tree := 'a Tree.t and type 'a t := 'a t
val invariants : 'a t -> boolval is_empty : 'a t -> boolval length : 'a t -> intval add : 'a t -> key:Key.t -> data:'a -> [ `Ok of 'a t | `Duplicate ]val add_exn : 'a t -> key:Key.t -> data:'a -> 'a tval set : 'a t -> key:Key.t -> data:'a -> 'a tval add_multi : 'a t -> key:Key.t -> data:'a -> 'a tval remove_multi : 'a t -> Key.t -> 'a tval find_multi : 'a t -> Key.t -> 'a listval change : 'a t -> Key.t -> f:('a option -> 'a option) -> 'a tval update : 'a t -> Key.t -> f:('a option -> 'a) -> 'a tval find : 'a t -> Key.t -> 'a optionval find_exn : 'a t -> Key.t -> 'aval remove : 'a t -> Key.t -> 'a tval mem : 'a t -> Key.t -> boolval iter_keys : 'a t -> f:(Key.t -> unit) -> unitval iter : 'a t -> f:('a -> unit) -> unitval iteri : 'a t -> f:(key:Key.t -> data:'a -> unit) -> unitval iteri_until : 'a t -> f:(key:Key.t -> data:'a -> Base__Map_intf.Continue_or_stop.t) -> Base__Map_intf.Finished_or_unfinished.tval iter2 : 'a t -> 'a t -> f:(key:Key.t -> data:[ `Left of 'a | `Right of 'b | `Both of 'a * 'b ] -> unit) -> unitval map : 'a t -> f:('a -> 'b) -> 'a tval mapi : 'a t -> f:(key:Key.t -> data:'a -> 'b) -> 'a tval fold : 'a t -> init:'b -> f:(key:Key.t -> data:'a -> 'b -> 'b) -> 'bval fold_right : 'a t -> init:'b -> f:(key:Key.t -> data:'a -> 'b -> 'b) -> 'bval fold2 : 'a t -> 'a t -> init:'c -> f:(key:Key.t -> data:[ `Left of 'a | `Right of 'b | `Both of 'a * 'b ] -> 'c -> 'c) -> 'cval filter_keys : 'a t -> f:(Key.t -> bool) -> 'a tval filter : 'a t -> f:('a -> bool) -> 'a tval filteri : 'a t -> f:(key:Key.t -> data:'a -> bool) -> 'a tval filter_map : 'a t -> f:('a -> 'b option) -> 'a tval filter_mapi : 'a t -> f:(key:Key.t -> data:'a -> 'b option) -> 'a tval partition_mapi : 'a t -> f:(key:Key.t -> data:'a -> ('b, 'c) Base.Either.t) -> 'a t * 'a tval partition_map : 'a t -> f:('a -> ('b, 'c) Base.Either.t) -> 'a t * 'a tval partitioni_tf : 'a t -> f:(key:Key.t -> data:'a -> bool) -> 'a t * 'a tval partition_tf : 'a t -> f:('a -> bool) -> 'a t * 'a tval combine_errors : 'a t -> 'a t Base.Or_error.tval compare_direct : ('a -> 'a -> int) -> 'a t -> 'a t -> intval equal : ('a -> 'a -> bool) -> 'a t -> 'a t -> boolval keys : 'a t -> Key.t listval data : 'a t -> 'a listval to_alist : ?key_order:[ `Increasing | `Decreasing ] -> 'a t -> (Key.t * 'a) listval validate : name:(Key.t -> string) -> 'a Base.Validate.check -> 'a t Base.Validate.checkval validatei : name:(Key.t -> string) -> (Key.t * 'a) Base.Validate.check -> 'a t Base.Validate.checkval merge : 'a t -> 'a t -> f:(key:Key.t -> [ `Left of 'a | `Right of 'b | `Both of 'a * 'b ] -> 'c option) -> 'a tval symmetric_diff : 'a t -> 'a t -> data_equal:('a -> 'a -> bool) -> (Key.t * [ `Left of 'a | `Right of 'a | `Unequal of 'a * 'a ]) Base.Sequence.tval fold_symmetric_diff : 'a t -> 'a t -> data_equal:('a -> 'a -> bool) -> init:'c -> f:('c -> (Key.t * [ `Left of 'a | `Right of 'a | `Unequal of 'a * 'a ]) -> 'c) -> 'cval min_elt : 'a t -> (Key.t * 'a) optionval min_elt_exn : 'a t -> Key.t * 'aval max_elt : 'a t -> (Key.t * 'a) optionval max_elt_exn : 'a t -> Key.t * 'aval for_all : 'a t -> f:('a -> bool) -> boolval for_alli : 'a t -> f:(key:Key.t -> data:'a -> bool) -> boolval exists : 'a t -> f:('a -> bool) -> boolval existsi : 'a t -> f:(key:Key.t -> data:'a -> bool) -> boolval count : 'a t -> f:('a -> bool) -> intval counti : 'a t -> f:(key:Key.t -> data:'a -> bool) -> intval split : 'a t -> Key.t -> 'a t * (Key.t * 'a) option * 'a tval append : lower_part:'a t -> upper_part:'a t -> [ `Ok of 'a t | `Overlapping_key_ranges ]val subrange : 'a t -> lower_bound:Key.t Base.Maybe_bound.t -> upper_bound:Key.t Base.Maybe_bound.t -> 'a tval fold_range_inclusive : 'a t -> min:Key.t -> max:Key.t -> init:'b -> f:(key:Key.t -> data:'a -> 'b -> 'b) -> 'bval range_to_alist : 'a t -> min:Key.t -> max:Key.t -> (Key.t * 'a) listval closest_key : 'a t -> [ `Greater_or_equal_to | `Greater_than | `Less_or_equal_to | `Less_than ] -> Key.t -> (Key.t * 'a) optionval nth : 'a t -> int -> (Key.t * 'a) optionval nth_exn : 'a t -> int -> Key.t * 'aval rank : 'a t -> Key.t -> int optionval to_tree : 'a t -> 'a Tree.tval to_sequence : ?order:[ `Increasing_key | `Decreasing_key ] -> ?keys_greater_or_equal_to:Key.t -> ?keys_less_or_equal_to:Key.t -> 'a t -> (Key.t * 'a) Base.Sequence.tval binary_search : 'a t -> compare:(key:Key.t -> data:'a -> 'key -> int) -> [ `Last_strictly_less_than | `Last_less_than_or_equal_to | `Last_equal_to | `First_equal_to | `First_greater_than_or_equal_to | `First_strictly_greater_than ] -> 'key -> (Key.t * 'a) optionval binary_search_segmented : 'a t -> segment_of:(key:Key.t -> data:'a -> [ `Left | `Right ]) -> [ `Last_on_left | `First_on_right ] -> (Key.t * 'a) option
val key_set : 'a t -> (Key.t, Key.comparator_witness) Base.Set.tval quickcheck_observer : Key.t Quickcheck.Observer.t -> 'v Quickcheck.Observer.t -> 'a t Quickcheck.Observer.tval quickcheck_shrinker : Key.t Quickcheck.Shrinker.t -> 'v Quickcheck.Shrinker.t -> 'a t Quickcheck.Shrinker.t