From: bugmaster <bugmaster@opencascade.com>
Date: Tue, 28 Feb 2017 12:02:55 +0000 (+0300)
Subject: 0026796: The result of General Fuse operation is self-intersecting shape
X-Git-Tag: V7_2_0_beta~237
X-Git-Url: http://git.dev.opencascade.org/gitweb/?a=commitdiff_plain;h=0d0c99de4dd6062b84a7e2dee3517c0f6f7cb3f0;p=occt.git

0026796: The result of General Fuse operation is self-intersecting shape

Adding test case
---

diff --git a/tests/bugs/modalg_6/bug26796 b/tests/bugs/modalg_6/bug26796
new file mode 100644
index 0000000000..f8321cb69f
--- /dev/null
+++ b/tests/bugs/modalg_6/bug26796
@@ -0,0 +1,28 @@
+puts "========"
+puts "OCC26796"
+puts "========"
+puts ""
+#################################################
+# General Fuse operation error
+#################################################
+
+box b1 10 10 10
+box b2 10.00000018 0 0 10 10 10
+explode b2 f
+copy b2_1 f
+trotate f 0 5 5 0 1 0 10
+mksurface s f
+mkface f s -100 100 -100 100
+
+bclearobjects
+bcleartools
+baddobjects b1 b2 f
+bfillds
+bbuild result
+bopcheck result
+
+checkshape result
+checknbshapes result -solid 4
+checkprops result -v 2852.9 -s 41403.1
+
+checkview -display result -2d -path ${imagedir}/${test_image}.png