val is_subset : ('a, 'cmp, ('a, 'cmp) named ‑> of_:('a, 'cmp) named ‑> unit Or_error.t) options
val equal : ('a, 'cmp, ('a, 'cmp) named ‑> ('a, 'cmp) named ‑> unit Or_error.t) options