Button (incr_dom.incr_dom.vdom_file_download.Vdom_file

val create : 
  ?enabled:bool ->
  ?on_click:
    (Js_of_ocaml.Dom_html.mouseEvent Js_of_ocaml.Js.t -> unit Ui_effect.t) ->
  ?extra_attrs:Virtual_dom.Vdom.Attr.t list ->
  get_download:(unit -> t) ->
  button_text:string ->
  unit ->
  Virtual_dom.Vdom.Node.t

Creates a button which, when clicked, will create a download using get_download and then trigger it.