0026310: Very slow boolean cut operations on cylinders
[occt.git] / tests / bugs / modalg_6 / bug26310_4
diff --git a/tests/bugs/modalg_6/bug26310_4 b/tests/bugs/modalg_6/bug26310_4
new file mode 100644 (file)
index 0000000..57c6dfa
--- /dev/null
@@ -0,0 +1,50 @@
+puts "TODO OCC25929 ALL: ERROR in bopargcheck res1"
+puts "TODO OCC25929 ALL: ERROR. res1 with continuity C0"
+puts "TODO OCC25929 ALL: ERROR in bopargcheck res2"
+puts "TODO OCC25929 ALL: ERROR. res2 with continuity C0"
+
+puts "========"
+puts "OCC26310"
+puts "========"
+puts ""
+#################################################
+# Very slow boolean cut operations on cylinders
+#################################################
+
+restore [locate_data_file OCC26310-b1.brep] b1 
+restore [locate_data_file OCC26310-b2.brep] b2 
+
+bop b2 b1
+
+bopcut res1
+boptuc res2
+
+checkshape res1
+checkshape res2
+
+set log1 [bopargcheck res1 #F]
+set log2 [bopargcheck res2 #F]
+
+if { [string first "Faulties for FIRST  shape found : 2" $log1] >= 0 } {
+  puts "ERROR in bopargcheck res1"
+}
+
+if { [string first "Shapes with Continuity C0       : YES  Cases(2)  Total shapes(2)" $log1] >= 0 } {
+  puts "ERROR. res1 with continuity C0."
+}
+
+if { [string first "Faulties for FIRST  shape found : 2" $log2] >= 0 } {
+  puts "ERROR in bopargcheck res2"
+}
+
+if { [string first "Shapes with Continuity C0       : YES  Cases(2)  Total shapes(2)" $log2] >= 0 } {
+  puts "ERROR. res2 with continuity C0."
+}
+
+smallview
+donly res1
+fit
+xwd ${imagedir}/${casename}_1.png
+donly res2
+fit
+xwd ${imagedir}/${casename}_2.png