Make.Observertype 'a t = ( 'a, state_witness ) Incremental.Observer.tval sexp_of_t :
( 'a -> Ppx_sexp_conv_lib.Sexp.t ) ->
'a t ->
Ppx_sexp_conv_lib.Sexp.tval invariant : 'a Base__Invariant_intf.inv -> 'a t Base__Invariant_intf.invval use_is_allowed : 'a t -> boolval value : 'a t -> 'a Core_kernel.Or_error.tval value_exn : 'a t -> 'amodule Update : sig ... endval disallow_future_use : 'a t -> unit