Module Using_comparator.TreeSource
Source
val sexp_of_t :
('k -> Sexplib0.Sexp.t) ->
('v -> Sexplib0.Sexp.t) ->
('cmp -> Sexplib0.Sexp.t) ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
Sexplib0.Sexp.tSource
val t_of_sexp_direct :
comparator:('k, 'cmp) Base.Comparator.t ->
(Base.Sexp.t -> 'k) ->
(Base.Sexp.t -> 'v) ->
Base.Sexp.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.tinclude Base.Dictionary_immutable.Creators
with type 'key key := 'key
and type ('key, 'data, 'cmp) t :=
('key, 'data, 'cmp) Base.Map.Using_comparator.Tree.t
and type ('fn, 'key, _, 'cmp) creator :=
comparator:('key, 'cmp) Base.Comparator.t ->
'fn
Source
val empty :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, _, 'cmp) Base.Map.Using_comparator.Tree.tSource
val singleton :
comparator:('k, 'cmp) Base.Comparator.t ->
'k ->
'v ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.tSource
val map_keys :
comparator:('k2, 'cmp2) Base.Comparator.t ->
('k1, 'v, 'cmp1) Base.Map.Using_comparator.Tree.t ->
f:('k1 -> 'k2) ->
[ `Ok of ('k2, 'v, 'cmp2) Base.Map.Using_comparator.Tree.t
| `Duplicate_key of 'k2 ]Source
val map_keys_exn :
comparator:('k2, 'cmp2) Base.Comparator.t ->
('k1, 'v, 'cmp1) Base.Map.Using_comparator.Tree.t ->
f:('k1 -> 'k2) ->
('k2, 'v, 'cmp2) Base.Map.Using_comparator.Tree.tSource
val transpose_keys :
comparator:('k1, 'cmp1) Base.Comparator.t ->
comparator:('k2, 'cmp2) Base.Comparator.t ->
('k1, ('k2, 'a, 'cmp2) Base.Map.Using_comparator.Tree.t, 'cmp1)
Base.Map.Using_comparator.Tree.t ->
('k2, ('k1, 'a, 'cmp1) Base.Map.Using_comparator.Tree.t, 'cmp2)
Base.Map.Using_comparator.Tree.tSource
val of_sorted_array :
comparator:('k, 'cmp) Base.Comparator.t ->
('k * 'v) array ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t Base.Or_error.tSource
val of_sorted_array_unchecked :
comparator:('k, 'cmp) Base.Comparator.t ->
('k * 'v) array ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.tSource
val of_increasing_iterator_unchecked :
comparator:('k, 'cmp) Base.Comparator.t ->
len:int ->
f:(int -> 'k * 'v) ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.tSource
val of_alist :
comparator:('k, 'cmp) Base.Comparator.t ->
('k * 'v) list ->
[ `Ok of ('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t
| `Duplicate_key of 'k ]Source
val of_alist_or_error :
comparator:('k, 'cmp) Base.Comparator.t ->
('k * 'v) list ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t Base.Or_error.tSource
val of_alist_exn :
comparator:('k, 'cmp) Base.Comparator.t ->
('k * 'v) list ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.tSource
val of_alist_multi :
comparator:('k, 'cmp) Base.Comparator.t ->
('k * 'v) list ->
('k, 'v list, 'cmp) Base.Map.Using_comparator.Tree.tSource
val of_alist_fold :
comparator:('k, 'cmp) Base.Comparator.t ->
('k * 'v1) list ->
init:'v2 ->
f:('v2 -> 'v1 -> 'v2) ->
('k, 'v2, 'cmp) Base.Map.Using_comparator.Tree.tSource
val of_alist_reduce :
comparator:('k, 'cmp) Base.Comparator.t ->
('k * 'v) list ->
f:('v -> 'v -> 'v) ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.tSource
val of_increasing_sequence :
comparator:('k, 'cmp) Base.Comparator.t ->
('k * 'v) Base.Sequence.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t Base.Or_error.tSource
val of_sequence :
comparator:('k, 'cmp) Base.Comparator.t ->
('k * 'v) Base.Sequence.t ->
[ `Ok of ('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t
| `Duplicate_key of 'k ]Source
val of_sequence_or_error :
comparator:('k, 'cmp) Base.Comparator.t ->
('k * 'v) Base.Sequence.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t Base.Or_error.tSource
val of_sequence_exn :
comparator:('k, 'cmp) Base.Comparator.t ->
('k * 'v) Base.Sequence.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.tSource
val of_sequence_multi :
comparator:('k, 'cmp) Base.Comparator.t ->
('k * 'v) Base.Sequence.t ->
('k, 'v list, 'cmp) Base.Map.Using_comparator.Tree.tSource
val of_sequence_fold :
comparator:('k, 'cmp) Base.Comparator.t ->
('k * 'v1) Base.Sequence.t ->
init:'v2 ->
f:('v2 -> 'v1 -> 'v2) ->
('k, 'v2, 'cmp) Base.Map.Using_comparator.Tree.tSource
val of_sequence_reduce :
comparator:('k, 'cmp) Base.Comparator.t ->
('k * 'v) Base.Sequence.t ->
f:('v -> 'v -> 'v) ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.tSource
val of_list_with_key :
comparator:('k, 'cmp) Base.Comparator.t ->
'v list ->
get_key:('v -> 'k) ->
[ `Ok of ('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t
| `Duplicate_key of 'k ]Source
val of_list_with_key_or_error :
comparator:('k, 'cmp) Base.Comparator.t ->
'v list ->
get_key:('v -> 'k) ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t Base.Or_error.tSource
val of_list_with_key_exn :
comparator:('k, 'cmp) Base.Comparator.t ->
'v list ->
get_key:('v -> 'k) ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.tSource
val of_list_with_key_multi :
comparator:('k, 'cmp) Base.Comparator.t ->
'v list ->
get_key:('v -> 'k) ->
('k, 'v list, 'cmp) Base.Map.Using_comparator.Tree.tSource
val of_list_with_key_fold :
comparator:('k, 'cmp) Base.Comparator.t ->
'v list ->
get_key:('v -> 'k) ->
init:'acc ->
f:('acc -> 'v -> 'acc) ->
('k, 'acc, 'cmp) Base.Map.Using_comparator.Tree.tSource
val of_list_with_key_reduce :
comparator:('k, 'cmp) Base.Comparator.t ->
'v list ->
get_key:('v -> 'k) ->
f:('v -> 'v -> 'v) ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.tSource
val of_iteri :
comparator:('k, 'cmp) Base.Comparator.t ->
iteri:(f:(key:'k -> data:'v -> unit) -> unit) ->
[ `Ok of ('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t
| `Duplicate_key of 'k ]Source
val of_iteri_exn :
comparator:('k, 'cmp) Base.Comparator.t ->
iteri:(f:(key:'k -> data:'v -> unit) -> unit) ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.tSource
val of_tree :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.tSource
val invariants :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
boolSource
val add :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
key:'k ->
data:'v ->
[ `Ok of ('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t | `Duplicate ]Source
val add_exn :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
key:'k ->
data:'v ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.tSource
val set :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
key:'k ->
data:'v ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.tSource
val add_multi :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v list, 'cmp) Base.Map.Using_comparator.Tree.t ->
key:'k ->
data:'v ->
('k, 'v list, 'cmp) Base.Map.Using_comparator.Tree.tSource
val remove_multi :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v list, 'cmp) Base.Map.Using_comparator.Tree.t ->
'k ->
('k, 'v list, 'cmp) Base.Map.Using_comparator.Tree.tSource
val find_multi :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v list, 'cmp) Base.Map.Using_comparator.Tree.t ->
'k ->
'v listSource
val change :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
'k ->
f:('v option -> 'v option) ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.tSource
val update :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
'k ->
f:('v option -> 'v) ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.tSource
val find :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
'k ->
'v optionSource
val find_exn :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
'k ->
'vSource
val remove :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
'k ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.tSource
val mem :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, _, 'cmp) Base.Map.Using_comparator.Tree.t ->
'k ->
boolSource
val iteri :
('k, 'v, _) Base.Map.Using_comparator.Tree.t ->
f:(key:'k -> data:'v -> unit) ->
unitSource
val iteri_until :
('k, 'v, _) Base.Map.Using_comparator.Tree.t ->
f:(key:'k -> data:'v -> Base.Map.Continue_or_stop.t) ->
Base.Map.Finished_or_unfinished.tSource
val iter2 :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v1, 'cmp) Base.Map.Using_comparator.Tree.t ->
('k, 'v2, 'cmp) Base.Map.Using_comparator.Tree.t ->
f:
(key:'k ->
data:[ `Left of 'v1 | `Right of 'v2 | `Both of 'v1 * 'v2 ] ->
unit) ->
unitSource
val map :
('k, 'v1, 'cmp) Base.Map.Using_comparator.Tree.t ->
f:('v1 -> 'v2) ->
('k, 'v2, 'cmp) Base.Map.Using_comparator.Tree.tSource
val mapi :
('k, 'v1, 'cmp) Base.Map.Using_comparator.Tree.t ->
f:(key:'k -> data:'v1 -> 'v2) ->
('k, 'v2, 'cmp) Base.Map.Using_comparator.Tree.tSource
val fold :
('k, 'v, _) Base.Map.Using_comparator.Tree.t ->
init:'acc ->
f:(key:'k -> data:'v -> 'acc -> 'acc) ->
'accSource
val fold_until :
('k, 'v, _) Base.Map.Using_comparator.Tree.t ->
init:'acc ->
f:(key:'k -> data:'v -> 'acc -> ('acc, 'final) Container.Continue_or_stop.t) ->
finish:('acc -> 'final) ->
'finalSource
val fold_right :
('k, 'v, _) Base.Map.Using_comparator.Tree.t ->
init:'acc ->
f:(key:'k -> data:'v -> 'acc -> 'acc) ->
'accSource
val fold2 :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v1, 'cmp) Base.Map.Using_comparator.Tree.t ->
('k, 'v2, 'cmp) Base.Map.Using_comparator.Tree.t ->
init:'acc ->
f:
(key:'k ->
data:[ `Left of 'v1 | `Right of 'v2 | `Both of 'v1 * 'v2 ] ->
'acc ->
'acc) ->
'accSource
val filter_keys :
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
f:('k -> bool) ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.tSource
val filter :
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
f:('v -> bool) ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.tSource
val filteri :
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
f:(key:'k -> data:'v -> bool) ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.tSource
val filter_map :
('k, 'v1, 'cmp) Base.Map.Using_comparator.Tree.t ->
f:('v1 -> 'v2 option) ->
('k, 'v2, 'cmp) Base.Map.Using_comparator.Tree.tSource
val filter_mapi :
('k, 'v1, 'cmp) Base.Map.Using_comparator.Tree.t ->
f:(key:'k -> data:'v1 -> 'v2 option) ->
('k, 'v2, 'cmp) Base.Map.Using_comparator.Tree.tSource
val partition_mapi :
('k, 'v1, 'cmp) Base.Map.Using_comparator.Tree.t ->
f:(key:'k -> data:'v1 -> ('v2, 'v3) Base.Either.t) ->
('k, 'v2, 'cmp) Base.Map.Using_comparator.Tree.t
* ('k, 'v3, 'cmp) Base.Map.Using_comparator.Tree.tSource
val partition_map :
('k, 'v1, 'cmp) Base.Map.Using_comparator.Tree.t ->
f:('v1 -> ('v2, 'v3) Base.Either.t) ->
('k, 'v2, 'cmp) Base.Map.Using_comparator.Tree.t
* ('k, 'v3, 'cmp) Base.Map.Using_comparator.Tree.tSource
val partitioni_tf :
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
f:(key:'k -> data:'v -> bool) ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t
* ('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.tSource
val partition_tf :
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
f:('v -> bool) ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t
* ('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.tSource
val combine_errors :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v Base.Or_error.t, 'cmp) Base.Map.Using_comparator.Tree.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t Base.Or_error.tSource
val unzip :
('k, 'v1 * 'v2, 'cmp) Base.Map.Using_comparator.Tree.t ->
('k, 'v1, 'cmp) Base.Map.Using_comparator.Tree.t
* ('k, 'v2, 'cmp) Base.Map.Using_comparator.Tree.tSource
val compare_direct :
comparator:('k, 'cmp) Base.Comparator.t ->
('v -> 'v -> int) ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
intSource
val equal :
comparator:('k, 'cmp) Base.Comparator.t ->
('v -> 'v -> bool) ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
boolSource
val to_alist :
?key_order:[ `Increasing | `Decreasing ] ->
('k, 'v, _) Base.Map.Using_comparator.Tree.t ->
('k * 'v) listSource
val merge :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v1, 'cmp) Base.Map.Using_comparator.Tree.t ->
('k, 'v2, 'cmp) Base.Map.Using_comparator.Tree.t ->
f:
(key:'k ->
[ `Left of 'v1 | `Right of 'v2 | `Both of 'v1 * 'v2 ] ->
'v3 option) ->
('k, 'v3, 'cmp) Base.Map.Using_comparator.Tree.tSource
val merge_disjoint_exn :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.tSource
val merge_skewed :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
combine:(key:'k -> 'v -> 'v -> 'v) ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.tSource
val symmetric_diff :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
data_equal:('v -> 'v -> bool) ->
('k * [ `Left of 'v | `Right of 'v | `Unequal of 'v * 'v ]) Base.Sequence.tSource
val fold_symmetric_diff :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
data_equal:('v -> 'v -> bool) ->
init:'acc ->
f:
('acc ->
('k * [ `Left of 'v | `Right of 'v | `Unequal of 'v * 'v ]) ->
'acc) ->
'accSource
val for_alli :
('k, 'v, _) Base.Map.Using_comparator.Tree.t ->
f:(key:'k -> data:'v -> bool) ->
boolSource
val existsi :
('k, 'v, _) Base.Map.Using_comparator.Tree.t ->
f:(key:'k -> data:'v -> bool) ->
boolSource
val counti :
('k, 'v, _) Base.Map.Using_comparator.Tree.t ->
f:(key:'k -> data:'v -> bool) ->
intSource
val sum :
(module Base.Container.Summable with type t = 'a) ->
('k, 'v, _) Base.Map.Using_comparator.Tree.t ->
f:('v -> 'a) ->
'aSource
val sumi :
(module Base.Container.Summable with type t = 'a) ->
('k, 'v, _) Base.Map.Using_comparator.Tree.t ->
f:(key:'k -> data:'v -> 'a) ->
'aSource
val split :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
'k ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t
* ('k * 'v) option
* ('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.tSource
val split_le_gt :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
'k ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t
* ('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.tSource
val split_lt_ge :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
'k ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t
* ('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.tSource
val append :
comparator:('k, 'cmp) Base.Comparator.t ->
lower_part:('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
upper_part:('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
[ `Ok of ('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t
| `Overlapping_key_ranges ]Source
val subrange :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
lower_bound:'k Base.Maybe_bound.t ->
upper_bound:'k Base.Maybe_bound.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.tSource
val fold_range_inclusive :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
min:'k ->
max:'k ->
init:'acc ->
f:(key:'k -> data:'v -> 'acc -> 'acc) ->
'accSource
val range_to_alist :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
min:'k ->
max:'k ->
('k * 'v) listSource
val closest_key :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
[ `Greater_or_equal_to | `Greater_than | `Less_or_equal_to | `Less_than ] ->
'k ->
('k * 'v) optionSource
val rank :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, _, 'cmp) Base.Map.Using_comparator.Tree.t ->
'k ->
int optionSource
val to_tree :
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.tSource
val to_sequence :
comparator:('k, 'cmp) Base.Comparator.t ->
?order:[ `Increasing_key | `Decreasing_key ] ->
?keys_greater_or_equal_to:'k ->
?keys_less_or_equal_to:'k ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
('k * 'v) Base.Sequence.tSource
val binary_search :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
compare:(key:'k -> data:'v -> 'key -> int) ->
Base.Binary_searchable.Which_target_by_key.t ->
'key ->
('k * 'v) optionSource
val binary_search_segmented :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
segment_of:(key:'k -> data:'v -> [ `Left | `Right ]) ->
Base.Binary_searchable.Which_target_by_segment.t ->
('k * 'v) optionSource
val binary_search_subrange :
comparator:('k, 'cmp) Base.Comparator.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.t ->
compare:(key:'k -> data:'v -> 'bound -> int) ->
lower_bound:'bound Base.Maybe_bound.t ->
upper_bound:'bound Base.Maybe_bound.t ->
('k, 'v, 'cmp) Base.Map.Using_comparator.Tree.tBuild_increasing can be used to construct a map incrementally from a sequence that is known to be increasing.