sig
type ('a, 'b) t = ('a, 'b) Extlib.MultiPMap.t
val empty : ('a, 'b) t
val is_empty : ('a, 'b) t -> bool
val create : ('a -> 'a -> int) -> ('b -> 'b -> int) -> ('a, 'b) t
val add : 'a -> 'b -> ('a, 'b) t -> ('a, 'b) t
val find : 'a -> ('a, 'b) t -> 'b Extlib.PSet.t
val remove_all : 'a -> ('a, 'b) t -> ('a, 'b) t
val remove : 'a -> 'b -> ('a, 'b) t -> ('a, 'b) t
val mem : 'a -> ('a, 'b) t -> bool
val iter : ('a -> 'b Extlib.PSet.t -> unit) -> ('a, 'b) t -> unit
val map :
('a Extlib.PSet.t -> 'b Extlib.PSet.t) ->
(('a -> 'a -> int) -> 'b -> 'b -> int) -> ('c, 'a) t -> ('c, 'b) t
val mapi :
('a -> 'b Extlib.PSet.t -> 'c Extlib.PSet.t) ->
(('b -> 'b -> int) -> 'c -> 'c -> int) -> ('a, 'b) t -> ('a, 'c) t
val fold : ('a Extlib.PSet.t -> 'b -> 'b) -> ('c, 'a) t -> 'b -> 'b
val foldi : ('a -> 'b Extlib.PSet.t -> 'c -> 'c) -> ('a, 'b) t -> 'c -> 'c
val enum : ('a, 'b) t -> ('a * 'b) Extlib.Enum.t
val of_enum :
?keys:('a -> 'a -> int) ->
?data:('b -> 'b -> int) -> ('a * 'b) Extlib.Enum.t -> ('a, 'b) t
val t_of_sexp :
(Sexplib.Sexp.t -> 'a) ->
(Sexplib.Sexp.t -> 'b) -> Sexplib.Sexp.t -> ('a, 'b) t
val sexp_of_t :
('a -> Sexplib.Sexp.t) ->
('b -> Sexplib.Sexp.t) -> ('a, 'b) t -> Sexplib.Sexp.t
val print :
?first:string ->
?last:string ->
?sep:string ->
('a Extlib.InnerIO.output -> 'b -> unit) ->
('a Extlib.InnerIO.output -> 'c -> unit) ->
'a Extlib.InnerIO.output -> ('b, 'c) t -> unit
end