module M: sig .. end
sig
end
type key = Base.t
Base.t
type t
val iter : (Base.t -> Ival.t -> unit) -> t -> unit
(Base.t -> Ival.t -> unit) -> t -> unit
val find : key -> t -> Ival.t
key -> t -> Ival.t
val fold : (Base.t -> Ival.t -> 'a -> 'a) -> t -> 'a -> 'a
(Base.t -> Ival.t -> 'a -> 'a) -> t -> 'a -> 'a