val of_incr : 'result Incr.t -> ('a, 'result) t
val pure : f:('input Incr.t -> 'result Incr.t) -> ('input, 'result) t
val model_cutoff : ('input, 'result) t -> ('input, 'result) t
val value_cutoff : cutoff:'input Incremental.Cutoff.t -> ('input, 'input) t
val map : ('input, 'r1) t -> f:('r1 Incr.t -> 'r2 Incr.t) -> ('input, 'r2) t
val map_input : ('i2, 'result) t -> f:('i1 Incr.t -> 'i2 Incr.t) -> ('i1, 'result) t
module type S = sig ... end
type ('input, 'model, 'action, 'result) component_s
= (module S with type Action.t = 'action and type Input.t = 'input and type Model.t = 'model and type Result.t = 'result)
val of_module : ('input, 'model, 'action, 'result) component_s -> default_model:'model -> ('input, 'result) t