external preventDefault : Dom.event -> unit = "preventDefault" [@@bs.send]

external target : Dom.event -> Dom.element = "target" [@@bs.get]