函子 MoreLabels.Map.Make

module Make: 
functor (Ord : OrderedType) -> S 
    with type key = Ord.t
     and type 'a t = 'a Map.Make(Ord).t

给定一个全序类型，构建映射结构实现的函子。

参数
Ord : OrderedType

映射

type key

映射键的类型。

type !+'a t

从类型 key 到类型 'a 的映射类型。

val empty : 'a t

空映射。

val add : key:key ->
       data:'a -> 'a t -> 'a t

add ~key ~data m 返回一个映射，它包含与 m 相同的绑定，以及一个 key 到 data 的绑定。如果 key 在 m 中已经绑定到一个与 data 物理上相等的值，则返回 m 不变（函数的结果在物理上与 m 相等）。否则，m 中 key 的先前绑定将消失。

val add_to_list : key:key ->
       data:'a -> 'a list t -> 'a list t

add_to_list ~key ~data m 等于 m，其中 key 映射到 l，使得如果 key 在 m 中已绑定，则 l 等于 data :: Map.find key m，否则为 [v]。

val update : key:key ->
       f:('a option -> 'a option) -> 'a t -> 'a t

update ~key ~f m 返回一个映射，它包含与 m 相同的绑定，除了 key 的绑定。根据 y 的值（其中 y 是 f (find_opt key m)），key 的绑定会被添加、删除或更新。如果 y 是 None，则如果存在则删除绑定；否则，如果 y 是 Some z，则在结果映射中将 key 与 z 关联。如果 key 在 m 中已经绑定到一个与 z 物理上相等的值，则返回 m 不变（函数的结果在物理上与 m 相等）。

val singleton : key -> 'a -> 'a t

singleton x y 返回包含 x 的绑定 y 的单元素映射。

val remove : key -> 'a t -> 'a t

remove x m 返回一个映射，它包含与 m 相同的绑定，除了 x 在返回的映射中未绑定。如果 x 不在 m 中，则返回 m 不变（函数的结果在物理上与 m 相等）。

val merge : f:(key -> 'a option -> 'b option -> 'c option) ->
       'a t -> 'b t -> 'c t

merge ~f m1 m2 计算一个映射，其键是 m1 和 m2 的键的子集。每个此类绑定的存在及其对应值由函数 f 确定。就 find_opt 操作而言，对于任何键 x，我们有 find_opt x (merge f m1 m2) = f x (find_opt x m1) (find_opt x m2)，前提是 f x None None = None。

val union : f:(key -> 'a -> 'a -> 'a option) ->
       'a t -> 'a t -> 'a t

union ~f m1 m2 计算一个映射，其键是 m1 和 m2 的键的子集。当在两个参数中定义相同的绑定时，使用函数 f 来组合它们。这是 merge 的一个特例：union f m1 m2 等效于 merge f' m1 m2，其中

  • f' _key None None = None
  • f' _key (Some v) None = Some v
  • f' _key None (Some v) = Some v
  • f' key (Some v1) (Some v2) = f key v1 v2
val cardinal : 'a t -> int

返回映射的绑定数量。

绑定

val bindings : 'a t -> (key * 'a) list

返回给定映射的所有绑定的列表。返回的列表按键的升序排序，排序方式为 Ord.compare，其中 Ord 是传递给 MoreLabels.Map.Make 的参数。

val min_binding : 'a t -> key * 'a

返回给定映射中键最小的绑定（相对于 Ord.compare 排序），或者如果映射为空则引发 Not_found。

val min_binding_opt : 'a t -> (key * 'a) option

返回给定映射中键最小的绑定（相对于 Ord.compare 排序），或者如果映射为空则返回 None。

val max_binding : 'a t -> key * 'a

与 MoreLabels.Map.S.min_binding 相同，但返回给定映射中键最大的绑定。

val max_binding_opt : 'a t -> (key * 'a) option

与 MoreLabels.Map.S.min_binding_opt 相同，但返回给定映射中键最大的绑定。

val choose : 'a t -> key * 'a

返回给定映射的一个绑定，或者如果映射为空则引发 Not_found。选择哪个绑定是不确定的，但对于相等的映射将选择相等的绑定。

val choose_opt : 'a t -> (key * 'a) option

返回给定映射的一个绑定，或者如果映射为空则返回 None。选择哪个绑定是不确定的，但对于相等的映射将选择相等的绑定。

搜索

val find : key -> 'a t -> 'a

find x m 返回 m 中 x 的当前值，或者如果不存在 x 的绑定则引发 Not_found。

val find_opt : key -> 'a t -> 'a option

find_opt x m 如果 m 中 x 的当前值是 v，则返回 Some v，或者如果不存在 x 的绑定则返回 None。

val find_first : f:(key -> bool) ->
       'a t -> key * 'a

find_first ~f m，其中 f 是一个单调递增函数，返回 m 中键最小的绑定 k，使得 f k，或者如果不存在此类键则引发 Not_found。

例如，find_first (fun k -> Ord.compare k x >= 0) m 将返回 m 的第一个绑定 k, v，其中 Ord.compare k x >= 0（直观上：k >= x），或者如果 x 大于 m 的任何元素则引发 Not_found。

val find_first_opt : f:(key -> bool) ->
       'a t -> (key * 'a) option

find_first_opt ~f m，其中 f 是一个单调递增函数，返回一个包含 m 中键最小的绑定 k 的选项，使得 f k，或者如果不存在此类键则返回 None。

val find_last : f:(key -> bool) ->
       'a t -> key * 'a

find_last ~f m，其中 f 是一个单调递减函数，返回 m 中键最大的绑定 k，使得 f k，或者如果不存在此类键则引发 Not_found。

val find_last_opt : f:(key -> bool) ->
       'a t -> (key * 'a) option

find_last_opt ~f m，其中 f 是一个单调递减函数，返回一个包含 m 中键最大的绑定 k 的选项，使得 f k，或者如果不存在此类键则返回 None。

遍历

val iter : f:(key:key -> data:'a -> unit) ->
       'a t -> unit

iter ~f m 将 f 应用于映射 m 中的所有绑定。 f 以键作为第一个参数，关联值作为第二个参数。绑定按键类型的排序顺序递增传递给 f。

val fold : f:(key:key -> data:'a -> 'acc -> 'acc) ->
       'a t -> init:'acc -> 'acc

fold ~f m ~init 计算 (f kN dN ... (f k1 d1 init)...)，其中 k1 ... kN 是 m 中所有绑定的键（按升序排列），d1 ... dN 是关联的数据。

转换

val map : f:('a -> 'b) -> 'a t -> 'b t

map ~f m 返回一个与 m 具有相同域的映射，其中 m 的所有绑定的关联值 a 已被 f 应用于 a 的结果替换。绑定按键类型的排序顺序递增传递给 f。

val mapi : f:(key -> 'a -> 'b) ->
       'a t -> 'b t

与 MoreLabels.Map.S.map 相同，但函数接收每个映射绑定的键和关联值作为参数。

val filter : f:(key -> 'a -> bool) ->
       'a t -> 'a t

filter ~f m 返回包含 m 中所有满足谓词 p 的绑定的映射。如果 m 中的每个绑定都满足 f，则返回 m 不变（函数的结果在物理上与 m 相等）。

val filter_map : f:(key -> 'a -> 'b option) ->
       'a t -> 'b t

filter_map ~f m 将函数 f 应用于 m 的每个绑定，并根据结果构建一个映射。对于输入映射中的每个绑定 (k, v)

  • 如果 f k v 是 None，则 k 不在结果中，
  • 如果 f k v 是 Some v'，则绑定 (k, v') 位于输出映射中。

例如，以下作用于值是列表的映射的函数

          filter_map
            (fun _k li -> match li with [] -> None | _::tl -> Some tl)
            m

删除 m 的所有值为空列表的绑定，并弹出每个非空值的第一个元素。

val partition : f:(key -> 'a -> bool) ->
       'a t -> 'a t * 'a t

partition ~f m 返回一对映射 (m1, m2)，其中 m1 包含满足谓词 f 的所有 m 的绑定，而 m2 是包含所有不满足 f 的 m 的绑定的映射。

val split : key ->
       'a t ->
       'a t * 'a option * 'a t

split x m 返回一个三元组 (l, data, r)，其中 l 是包含所有键严格小于 x 的 m 的绑定的映射；r 是包含所有键严格大于 x 的 m 的绑定的映射；data 如果 m 不包含 x 的绑定，则为 None，如果 m 将 v 绑定到 x，则为 Some v。

谓词和比较

val is_empty : 'a t -> bool

测试映射是否为空。

val mem : key -> 'a t -> bool

mem x m 如果 m 包含 x 的绑定，则返回 true，否则返回 false。

val equal : cmp:('a -> 'a -> bool) ->
       'a t -> 'a t -> bool

equal ~cmp m1 m2 测试映射 m1 和 m2 是否相等，即包含相同的键并将它们与相同的数据关联。 cmp 是用于比较与键关联的数据的相等谓词。

val compare : cmp:('a -> 'a -> int) ->
       'a t -> 'a t -> int

映射之间的全序关系。第一个参数是用于比较两个映射中与相同键关联的数据的全序关系。

val for_all : f:(key -> 'a -> bool) -> 'a t -> bool

for_all ~f m 检查映射的所有绑定是否都满足谓词 f。

val exists : f:(key -> 'a -> bool) -> 'a t -> bool

exists ~f m 检查映射的至少一个绑定是否满足谓词 f。

转换

val to_list : 'a t -> (key * 'a) list

to_list m 等于 MoreLabels.Map.S.bindings m。

val of_list : (key * 'a) list -> 'a t

of_list bs 将 bs 的绑定添加到空映射中，按照列表顺序（如果 bs 中某个键被绑定两次，则最后一个绑定生效）。

val to_seq : 'a t -> (key * 'a) Seq.t

以键的升序遍历整个映射。

val to_rev_seq : 'a t -> (key * 'a) Seq.t

以键的降序遍历整个映射。

val to_seq_from : key ->
       'a t -> (key * 'a) Seq.t

to_seq_from k m 以键的升序遍历 m 的一部分绑定，从键 k 或更高版本开始。

val add_seq : (key * 'a) Seq.t ->
       'a t -> 'a t

按顺序将给定的绑定添加到映射中。

val of_seq : (key * 'a) Seq.t -> 'a t

根据给定的绑定构建一个映射。