Module Incr.Cutoff

type 'a t = 'a Incremental.Cutoff.t
val sexp_of_t : ('a -> Ppx_sexp_conv_lib.Sexp.t) -> 'a t -> Ppx_sexp_conv_lib.Sexp.t
include Core_kernel.Invariant.S1 with type 'a t := 'a t
val invariant : ('a -> unit) -> 'a t -> unit
val create : (old_value:'a -> new_value:'a -> bool) -> 'a t
val of_compare : ('a -> 'a -> int) -> 'a t
val of_equal : ('a -> 'a -> bool) -> 'a t
val always : _ t
val never : _ t
val phys_equal : _ t
val poly_equal : _ t
val should_cutoff : 'a t -> old_value:'a -> new_value:'a -> bool
val equal : 'a t -> 'a t -> bool