Module type Base__.Equal.S3

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