module type Key = Base__.Hashable_intf.Keymodule type Hashable = Base__.Hashable_intf.Hashabletype 'a t = 'a Base__.Hashable_intf.Hashable.t = {hash : 'a ‑> int; |
compare : 'a ‑> 'a ‑> int; |
sexp_of_t : 'a ‑> Base.Sexp.t; |
}val poly : 'a tval of_key : (module Base__.Hashable_intf.Key with type t = 'a) ‑> 'a tval to_key : 'a t ‑> (module Base__.Hashable_intf.Key with type t = 'a)