Browser.MakeSourcetype ('model, 'msg) t = {window : window Js_of_ocaml.Js.t;root : node Js_of_ocaml.Js.t;view : 'model -> 'msg Vdom.t;update : 'msg -> 'model -> 'model * 'msg Command.t;subscription : 'model -> 'msg Subscription.t;mutable model : 'model;mutable dirty : bool;mutable tree : 'msg Tree.t option;}val make :
window Js_of_ocaml.Js.t ->
node Js_of_ocaml.Js.t ->
'model ->
('model -> 'msg Vdom.t) ->
('msg -> 'model -> 'model * 'msg Command.t) ->
('model -> 'msg Subscription.t) ->
('model, 'msg) tval make_event_handler :
('model, 'msg) t ->
'msg Decoder.t ->
(Fmlib.Common.Void.t Js_of_ocaml.Js.t -> unit) Js_of_ocaml.Js.callbackval element :
'a Decoder.t ->
('a -> 'model * 'msg App.Command.t) ->
('model -> 'msg Vdom.t) ->
('msg -> 'model -> 'model * 'msg App.Command.t) ->
('model -> 'msg App.Subscription.t) ->
unit