Derived_phantom.1-M
type ('a, 'b) t
val compare : ('a -> 'a -> int) -> ('a, 'b) t -> ('a, 'b) t -> int
val sexp_of_t : ('a -> Sexp.t) -> ('a, _) t -> Sexp.t