0029502: Improve performance of the ShapeUpgrade_UnifySameDomain::UnifyEdges() method
[occt.git] / tests / bugs / modalg_7 / bug29502
diff --git a/tests/bugs/modalg_7/bug29502 b/tests/bugs/modalg_7/bug29502
new file mode 100644 (file)
index 0000000..f4d0770
--- /dev/null
@@ -0,0 +1,30 @@
+puts "========"
+puts "OCC29502"
+puts "========"
+puts ""
+#################################################
+# Improve performance of the ShapeUpgrade_UnifySameDomain::UnifyEdges() method
+#################################################
+
+# create cylinder
+cylinder c 0 0 0 0 0 1 10
+mkface f c 0 2*pi -10 10
+
+# split seam edge by the vertex
+vertex v 10 0 0
+bclearobjects
+bcleartools
+baddobjects f
+baddtools v
+bfillds
+bsplit r
+explode r f
+
+# perform unification of the seam edge:
+# the split vertex should be removed
+unifysamedom result r_1
+
+checkshape result
+checkprops result -equal f
+checknbshapes result -ref [nbshapes f]
+