listToSequenceGeo :: [(Double, Double)] -> Sequence.Seq Geospatial.PointXY
listToSequenceGeo pts = Sequence.fromList $ fmap (uncurry Geospatial.PointXY) pts
listToSequenceGeo :: [(Double, Double)] -> Sequence.Seq Geospatial.PointXY
listToSequenceGeo pts = Sequence.fromList $ fmap (uncurry Geospatial.PointXY) pts
listToSequenceGeo pts = Sequence.fromList $ fmap (uncurry Geospatial.PointXY) pts