module type SeededHashedType =The input signature of the functorsig..end
Hashtbl.MakeSeeded.type 
val equal : t -> t -> boolval hash : int -> t -> intequal x y is true,
          then hash seed x = hash seed y for any value of seed.
          A suitable choice for hash is the function Hashtbl.seeded_hash
          below.