Module Incremental_kernel__.If_then_else

A module internal to Incremental. Users should see Incremental_intf.

An 'a If_then_else.t is a kind of DAG node.

include module type of sig ... end

type 'a t = 'a Incremental_kernel__Types.If_then_else.t = {

main : 'a Incremental_kernel__Types.Node.t;

test : bool Incremental_kernel__Types.Node.t;

test_change : unit Incremental_kernel__Types.Node.t;

mutable current_branch : 'a Incremental_kernel__Types.Node.t Incremental_kernel__.Uopt.t;

then_ : 'a Incremental_kernel__Types.Node.t;

else_ : 'a Incremental_kernel__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_kernel__.Sexp_of.S1 with type a t := a t

type 'a t

include sig ... end

val sexp_of_t : ('a ‑> Sexplib.Sexp.t) ‑> 'a t ‑> Sexplib.Sexp.t