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