From: mkv <mkv@opencascade.com>
Date: Fri, 21 Jul 2017 13:41:14 +0000 (+0300)
Subject: Test for 0028551: Bad result of general fuse
X-Git-Tag: V7_2_0_beta~24
X-Git-Url: http://git.dev.opencascade.org/gitweb/?a=commitdiff_plain;h=751b10f25b41e8bf3f7695e3f0cbb5ffc3746988;p=occt-copy.git

Test for 0028551: Bad result of general fuse
---

diff --git a/tests/bugs/modalg_7/bug28551 b/tests/bugs/modalg_7/bug28551
new file mode 100644
index 0000000000..ce8755d68b
--- /dev/null
+++ b/tests/bugs/modalg_7/bug28551
@@ -0,0 +1,26 @@
+puts "================"
+puts "OCC28551"
+puts "================"
+puts ""
+#######################################################################
+# Bad result of general fuse
+#######################################################################
+
+restore [locate_data_file bug28551_ts_orig.brep] ts0
+restore [locate_data_file bug28551_pc_orig.brep] pc
+
+DT_ShapeDivide ts ts0
+
+bfuzzyvalue 1.0
+bclearobjects
+bcleartools
+baddobjects ts
+baddtools pc
+
+bfillds
+
+bbuild result
+
+checkshape result
+
+checkview -display result -2d -path ${imagedir}/${test_image}.png