val hash : t -> int
val uid : t -> Uid.t
val equal : t -> t -> bool
+
+
+ val with_id : Uid.t -> t
end
module type S =
val hash : t -> int
val uid : t -> Uid.t
val equal : t -> t -> bool
+
+
+ val with_id : Uid.t -> t
end
module Make (H : Hashtbl.HashedType) : S with type data = H.t