sig
  type ('a, 'b) t
  val empty : ('a, 'b) BatMultiPMap.t
  val is_empty : ('a, 'b) BatMultiPMap.t -> bool
  val create :
    ('a -> 'a -> int) -> ('b -> 'b -> int) -> ('a, 'b) BatMultiPMap.t
  val add : 'a -> 'b -> ('a, 'b) BatMultiPMap.t -> ('a, 'b) BatMultiPMap.t
  val find : 'a -> ('a, 'b) BatMultiPMap.t -> 'b BatPSet.t
  val remove_all : 'a -> ('a, 'b) BatMultiPMap.t -> ('a, 'b) BatMultiPMap.t
  val remove : 'a -> 'b -> ('a, 'b) BatMultiPMap.t -> ('a, 'b) BatMultiPMap.t
  val mem : 'a -> ('a, 'b) BatMultiPMap.t -> bool
  val iter : ('a -> 'b BatPSet.t -> unit) -> ('a, 'b) BatMultiPMap.t -> unit
  val map :
    ('a BatPSet.t -> 'b BatPSet.t) ->
    (('a -> 'a -> int) -> 'b -> 'b -> int) ->
    ('c, 'a) BatMultiPMap.t -> ('c, 'b) BatMultiPMap.t
  val mapi :
    ('a -> 'b BatPSet.t -> 'c BatPSet.t) ->
    (('b -> 'b -> int) -> 'c -> 'c -> int) ->
    ('a, 'b) BatMultiPMap.t -> ('a, 'c) BatMultiPMap.t
  val fold :
    ('a BatPSet.t -> 'b -> 'b) -> ('c, 'a) BatMultiPMap.t -> 'b -> 'b
  val foldi :
    ('a -> 'b BatPSet.t -> 'c -> 'c) -> ('a, 'b) BatMultiPMap.t -> 'c -> 'c
  val enum : ('a, 'b) BatMultiPMap.t -> ('a * 'b) BatEnum.t
  val of_enum :
    ?keys:('a -> 'a -> int) ->
    ?data:('b -> 'b -> int) -> ('a * 'b) BatEnum.t -> ('a, 'b) BatMultiPMap.t
  module Infix :
    sig
      val ( --> ) : ('a, 'b) BatMultiPMap.t -> 'a -> 'b BatPSet.t
      val ( <-- ) :
        ('a, 'b) BatMultiPMap.t -> 'a * 'b -> ('a, 'b) BatMultiPMap.t
    end
  val print :
    ?first:string ->
    ?last:string ->
    ?sep:string ->
    ('a BatInnerIO.output -> 'b -> unit) ->
    ('a BatInnerIO.output -> 'c -> unit) ->
    'a BatInnerIO.output -> ('b, 'c) BatMultiPMap.t -> unit
end