Module Incremental__.If_then_else

include module type of sig ... end
type 'a t = 'a Incremental__Types.If_then_else.t = {
main : 'a Incremental__Types.Node.t;
test : bool Incremental__Types.Node.t;
test_change : unit Incremental__Types.Node.t;
mutable current_branch : 'a Incremental__Types.Node.t Incremental__.Import.Uopt.t;
then_ : 'a Incremental__Types.Node.t;
else_ : 'a Incremental__Types.Node.t;
}
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