Module `Bonsai.Expert`

module Snapshot : sig ... end

type ('input, 'model, 'action, 'result) unpacked = ('input, 'model, 'action, 'result) Bonsai.Make(Incr)(Vdom.Event).Expert.unpacked
type ('input, 'model, 'result) t = private ('input, 'model, 'result) Bonsai.Make(Incr)(Vdom.Event).Expert.t = | T : ('input0, 'model0, 'action, 'result0) unpacked * 'action Core_kernel.Type_equal.Id.t -> ('input0, 'model0, 'result0) t

val reveal : ('input, 'model, 'result) t -> ('input, 'model, 'result) t
val conceal : ('input, 'model, 'result) t -> ('input, 'model, 'result) t
val of_full : f:(input:'input Incr.t -> old_model:'model option Incr.t -> model:'model Incr.t -> inject:('action -> Vdom.Event.t) -> ('model, 'action, 'result) Snapshot.t Incr.t) -> action_type_id:'action Core_kernel.Type_equal.Id.t -> ('input, 'model, 'result) t
val eval : input:'input Incr.t -> old_model:'model option Incr.t -> model:'model Incr.t -> inject:('action -> Vdom.Event.t) -> action_type_id:'action Core_kernel.Type_equal.Id.t -> ('input, 'model, 'action, 'result) unpacked -> ('model, 'action, 'result) Snapshot.t Incr.t
val optimize : ('input, 'model, 'result) t -> ('input, 'model, 'result) t