sig
  type ('a, 'b) t = ('a, 'b) Package.Map.t
  val empty : ('a, 'b) t
  val is_empty : ('a, 'b) t -> bool
  val add : 'Package.Name.t -> '-> ('a, 'b) t -> ('a, 'b) t
  val find : 'Package.Name.t -> ('a, 'b) t -> 'b
  val iter : ('Package.Name.t -> '-> unit) -> ('a, 'b) t -> unit
  val mapi : ('Package.Name.t -> '-> 'c) -> ('a, 'b) t -> ('a, 'c) t
  val fold : ('Package.Name.t -> '-> '-> 'c) -> ('a, 'b) t -> '-> 'c
  val bindings : ('a, 'b) t -> ('Package.Name.t * 'b) list
  val update_default :
    '-> ('-> 'b) -> 'Package.Name.t -> ('a, 'b) t -> ('a, 'b) t
  val mem : 'Package.Name.t -> ('a, 'b) t -> bool
end