Module Locations.Location_Bits.M


module M: sig .. end

type key = Base.t 
type t 
val find : key -> t -> Ival.t
val fold : (Base.t -> Ival.t -> 'a -> 'a) -> t -> 'a -> 'a