external preventDefault : this:[> `Event] GdomeT.t -> unit = "ml_gdome_evnt_preventDefault"