(* BSD-2-Clause License *) type t val create : float -> float -> t val lat : t -> float val lng : t -> float val equals : t -> t -> bool val of_jv : Jv.t -> t val to_jv : t -> Jv.t