type _ k = | Other : Asn.oid -> string list k| Rfc_822 : string list k| DNS : string list k| X400_address : unit k| Directory : Distinguished_name.t list k| EDI_party : (string option * string) list k| URI : string list k| IP : string list k| Registered_id : Asn.oid list k
include Gmap.S with type 'a key = 'a k
val singleton : 'a key -> 'a -> tval mem : 'a key -> t -> boolval find : 'a key -> t -> 'a optionval get : 'a key -> t -> 'aval add_unless_bound : 'a key -> 'a -> t -> t optionval add : 'a key -> 'a -> t -> tval remove : 'a key -> t -> tval update : 'a key -> ('a option -> 'a option) -> t -> ttype b = | B : 'a key * 'a -> b
val min_binding : t -> b optionval max_binding : t -> b optionval any_binding : t -> b optionval bindings : t -> b listtype eq = {f : 'a. 'a key -> 'a -> 'a -> bool;
}val equal : eq -> t -> t -> booltype mapper = {f : 'a. 'a key -> 'a -> 'a;
}val iter : (b -> unit) -> t -> unitval fold : (b -> 'a -> 'a) -> t -> 'a -> 'aval for_all : (b -> bool) -> t -> boolval exists : (b -> bool) -> t -> boolval filter : (b -> bool) -> t -> ttype merger = {f : 'a. 'a key -> 'a option -> 'a option -> 'a option;
}type unionee = {f : 'a. 'a key -> 'a -> 'a -> 'a option;
}