Module `Bonsai__.Leaf_incr`

type Bonsai__.Import.Component.unpacked += C : { apply_action : ('input, 'incr) Incremental.t -> ('model, 'incr) Incremental.t -> inject:('action -> 'event) -> (schedule_event:('event -> unit) -> 'action -> 'model, 'incr) Incremental.t; compute : ('input, 'incr) Incremental.t -> ('model, 'incr) Incremental.t -> inject:('action -> 'event) -> ('result, 'incr) Incremental.t; name : string; } -> ('input, 'model, 'action, 'result, 'incr, 'event) Bonsai__.Import.Component.unpacked

val leaf_incr : (module Bonsai__.Import.Component.Model with type t = 'model) -> (module Bonsai__.Import.Component.Action with type t = 'action) -> name:string -> default_model:'model -> apply_action:(('input, 'incr) Incremental.t -> ('model, 'incr) Incremental.t -> inject:('action -> 'event) -> (schedule_event:('event -> unit) -> 'action -> 'model, 'incr) Incremental.t) -> compute:(('input, 'incr) Incremental.t -> ('model, 'incr) Incremental.t -> inject:('action -> 'event) -> ('result, 'incr) Incremental.t) -> ('input, 'result, 'incr, 'event) Bonsai__.Import.Component.Packed.t