testCloseIfNot :: Spec
testCloseIfNot =
  describe "close" $
    it "Small set of points" $
      InternalPolygon.closeIfNot (SpecHelper.listToSequenceGeo simplePolygonPts) `shouldBe` Just (SpecHelper.listToSequenceGeo expectedSimplePolygonPts)
testCloseIfNot :: Spec
testCloseIfNot =
  describe "close" $
    it "Small set of points" $
      InternalPolygon.closeIfNot (SpecHelper.listToSequenceGeo simplePolygonPts) `shouldBe` Just (SpecHelper.listToSequenceGeo expectedSimplePolygonPts)
testCloseIfNot =
  describe "close" $
    it "Small set of points" $
      InternalPolygon.closeIfNot (SpecHelper.listToSequenceGeo simplePolygonPts) `shouldBe` Just (SpecHelper.listToSequenceGeo expectedSimplePolygonPts)