external get_type : this:[> `Event] GdomeT.t -> TDOMString.t = "ml_gdome_evnt_get_type"