sig type t val sexp_of_t : Comparator.Pre.t -> Sexplib.Sexp.t val t_of_sexp : Sexplib.Sexp.t -> Comparator.Pre.t val compare : Comparator.Pre.t -> Comparator.Pre.t -> int end