1
0
mirror of https://git.dev.opencascade.org/repos/occt.git synced 2025-09-18 14:27:39 +03:00

0027356: BRepTools::Clean() does not clean free edges from Poly_Polygon3D

Added code to clean 3D polygons on edges in BRepTools::Clean().
This commit is contained in:
oan
2016-04-15 17:12:28 +03:00
committed by bugmaster
parent 28c08a7d40
commit a4ab454c0f
2 changed files with 33 additions and 0 deletions

View File

@@ -0,0 +1,18 @@
puts "# ============================================================="
puts "# 0027356: BRepTools::Clean() does not clean free edges from Poly_Polygon3D"
puts "# ============================================================="
puts ""
puts "Create simple straight edge and tessellate it"
vertex v1 0 0 0
vertex v2 1 0 0
edge e v1 v2
incmesh e 0.01
puts "Clean triangulation and check that there are no Polygon3Ds remained"
tclean e
if { ! [regexp {Dump of ([0-9]+) Polygon3Ds} [dump e] res count] } {
puts "Error: Cannot find number of Polygon3Ds in output of trinfo command"
} elseif { $count != 0 } {
puts "Error: $count Polygon3Ds are found (zero expected)!"
}