]> OCCT Git - occt-copy.git/commitdiff
0032253: Mesh - The refactored Mesher fails to mesh correctly scaled (planar) faces
authoroan <oan@opencascade.com>
Fri, 2 Apr 2021 08:46:35 +0000 (11:46 +0300)
committeroan <oan@opencascade.com>
Fri, 2 Apr 2021 08:46:35 +0000 (11:46 +0300)
IMeshTools_ShapeExplorer: use transformation without scale factor

src/IMeshTools/IMeshTools_ShapeExplorer.cxx

index c80888deabdab9e0782163cae8d022fefd488bd4..1ddb7603cd56e614d84504ce38c9e93e70a2b39d 100644 (file)
@@ -95,6 +95,9 @@ void IMeshTools_ShapeExplorer::Accept (
   for (; aFaceIter.More (); aFaceIter.Next ())
   {
     TopoDS_Shape aFaceNoLoc = aFaceIter.Value ();
+    
+    gp_Trsf aTrsf = (gp_Trsf)(aFaceNoLoc.Location());
+    
     aFaceNoLoc.Location (aEmptyLoc);
     if (!aFaceMap.Add(aFaceNoLoc))
     {
@@ -106,6 +109,9 @@ void IMeshTools_ShapeExplorer::Accept (
     {
       continue;
     }
+    
+    aTrsf.SetScaleFactor (1.0);
+    aFaceNoLoc.Location (TopLoc_Location (aTrsf));
 
     // Explore all edges in face.
     visitEdges (theVisitor, aFace, Standard_False, TopAbs_EDGE);