type 'a t
include sig ... end
val sexp_of_t : ('a ‑> Base.Sexp.t) ‑> 'a t ‑> Base.Sexp.t
val create : ?on_change:('a ‑> unit) ‑> 'a Incremental_kernel__.Node.t ‑> 'a t
val value : Incremental_kernel__.State.t ‑> 'a t ‑> 'a