+ if (aType > GeomAbs_Torus) { // non-elementary surfaces
+ // remove last face to prevent close tape creation
+ // it is a workaround for Tulip bos #26791
+ // as there is a problem with closed tape on some surface types
+ aBB.Remove (aShell, aCurrentFace);
+ aNbFacesInTape--;
+ anAreaOfTape -= theFaceAreaMap(aCurrentFace);
+ aBB.Add(theRes, aCurrentFace); // aaajfa ???
+ theRemovedFaces.Remove(aCurrentFace);
+ if (theExtremalFaces.Contains(aCurrentFace)) {
+ aNbFacesDone--;
+ }
+ }