type type' module Event : sig type t end module Mouse : sig type t val latlng : t -> Latlng.t end