type t = | Lt| Le| Eq| Neq| Gt| Ge| In| NotIn| Is| IsNot| Exception| BAD
include Ppx_compare_lib.Comparable.S with type t := t
val compare : t Base__Ppx_compare_lib.compareinclude Ppx_enumerate_lib.Enumerable.S with type t := t
val to_string : t -> stringval pp : Stdlib.Format.formatter -> t -> unit