sig val equal : 'a Generic_core.Ty.T.ty -> 'a -> 'a -> bool end