sig type t val get_hash : GenericMap.S.t -> int end