Adjusting bugs group for current state of OCCT
[occt.git] / tests / bugs / moddata / bug3721_4
diff --git a/tests/bugs/moddata/bug3721_4 b/tests/bugs/moddata/bug3721_4
new file mode 100644 (file)
index 0000000..114a74c
--- /dev/null
@@ -0,0 +1,26 @@
+puts "============"
+puts "OCC3721"
+puts "============"
+puts ""
+######################################################
+# When using Boolean Operations exception is raised for some tolerance vals.
+######################################################
+## (new topology)
+## (bcut)
+######################################################
+
+restore [locate_data_file OCC3721-1.brep] b1 
+restore [locate_data_file OCC3721-2.brep] b2 
+
+checkshape b1
+checkshape b2
+
+if { [catch {bcut result b1 b2} catch_result] } {
+   puts "Faulty OCC3721"
+}
+
+checkshape result
+
+set square 71185
+set 3dviewer 1
+