Base.Predicate
type t
= string * int
val compare : 'a -> 'a -> int
val equal : 'a -> 'a -> bool
val hash : 'a -> int