Module Make.Geometry

type json = json
module Position : sig ... end
module Point : sig ... end
module MultiPoint : sig ... end
module LineString : sig ... end
module MultiLineString : sig ... end
module Polygon : sig ... end
module MultiPolygon : sig ... end
type t =
| Point of Point.t
| MultiPoint of MultiPoint.t
| LineString of LineString.t
| MultiLineString of MultiLineString.t
| Polygon of Polygon.t
| MultiPolygon of MultiPolygon.t
| Collection of t list
val of_json : json -> (t[ `Msg of string ]) Stdlib.result
val to_json : t -> json