parseGeometryCollection :: (BaseType a) => Value -> Parser (GeometryObject a)
parseGeometryCollection (Object a) = GeometryCollection <$> a .: geometriesField
parseGeometryCollection :: (BaseType a) => Value -> Parser (GeometryObject a)
parseGeometryCollection (Object a) = GeometryCollection <$> a .: geometriesField
parseGeometryCollection (Object a) = GeometryCollection <$> a .: geometriesField