Module Incremental__.Freeze

include module type of sig ... end
type 'a t = 'a Incremental__Types.Freeze.t = {
main : 'a Incremental__Types.Node.t;
child : 'a Incremental__Types.Node.t;
only_freeze_when : 'a -> bool;
}
include Core_kernel.Invariant.S1 with type 'a t := 'a t
type 'a t
val invariant : 'a Base__.Invariant_intf.inv -> 'a t Base__.Invariant_intf.inv
include Incremental__.Sexp_of.S1 with type 'a t := 'a t
type 'a t
val sexp_of_t : ('a -> Ppx_sexp_conv_lib.Sexp.t) -> 'a t -> Ppx_sexp_conv_lib.Sexp.t