sig
  type elt
  type t
  val empty : CCMultiSet.S.t
  val is_empty : CCMultiSet.S.t -> bool
  val mem : CCMultiSet.S.t -> CCMultiSet.S.elt -> bool
  val count : CCMultiSet.S.t -> CCMultiSet.S.elt -> int
  val singleton : CCMultiSet.S.elt -> CCMultiSet.S.t
  val add : CCMultiSet.S.t -> CCMultiSet.S.elt -> CCMultiSet.S.t
  val remove : CCMultiSet.S.t -> CCMultiSet.S.elt -> CCMultiSet.S.t
  val add_mult : CCMultiSet.S.t -> CCMultiSet.S.elt -> int -> CCMultiSet.S.t
  val remove_mult :
    CCMultiSet.S.t -> CCMultiSet.S.elt -> int -> CCMultiSet.S.t
  val update :
    CCMultiSet.S.t -> CCMultiSet.S.elt -> (int -> int) -> CCMultiSet.S.t
  val min : CCMultiSet.S.t -> CCMultiSet.S.elt
  val max : CCMultiSet.S.t -> CCMultiSet.S.elt
  val union : CCMultiSet.S.t -> CCMultiSet.S.t -> CCMultiSet.S.t
  val meet : CCMultiSet.S.t -> CCMultiSet.S.t -> CCMultiSet.S.t
  val intersection : CCMultiSet.S.t -> CCMultiSet.S.t -> CCMultiSet.S.t
  val diff : CCMultiSet.S.t -> CCMultiSet.S.t -> CCMultiSet.S.t
  val contains : CCMultiSet.S.t -> CCMultiSet.S.t -> bool
  val compare : CCMultiSet.S.t -> CCMultiSet.S.t -> int
  val equal : CCMultiSet.S.t -> CCMultiSet.S.t -> bool
  val cardinal : CCMultiSet.S.t -> int
  val iter : CCMultiSet.S.t -> (int -> CCMultiSet.S.elt -> unit) -> unit
  val fold :
    CCMultiSet.S.t -> '-> ('-> int -> CCMultiSet.S.elt -> 'b) -> 'b
  val of_list : CCMultiSet.S.elt list -> CCMultiSet.S.t
  val to_list : CCMultiSet.S.t -> CCMultiSet.S.elt list
  val to_seq : CCMultiSet.S.t -> CCMultiSet.S.elt CCMultiSet.sequence
  val of_seq : CCMultiSet.S.elt CCMultiSet.sequence -> CCMultiSet.S.t
  val of_list_mult : (CCMultiSet.S.elt * int) list -> CCMultiSet.S.t
  val to_list_mult : CCMultiSet.S.t -> (CCMultiSet.S.elt * int) list
  val to_seq_mult :
    CCMultiSet.S.t -> (CCMultiSet.S.elt * int) CCMultiSet.sequence
  val of_seq_mult :
    (CCMultiSet.S.elt * int) CCMultiSet.sequence -> CCMultiSet.S.t
end