Module type Base__.Equal.S2

type ('a, 'b) t
val equal : 'a equal ‑> 'b equal ‑> ('a'bt equal