From 15b9dfc95d06212d0567789adfb2c634220242e2 Mon Sep 17 00:00:00 2001
From: bugmaster <bugmaster@opencascade.com>
Date: Thu, 8 Sep 2016 16:22:40 +0300
Subject: [PATCH] 0022609: Cut operation between two solids produces not valid
 shape

Adding test case
---
 tests/bugs/modalg_6/bug22609 | 40 ++++++++++++++++++++++++++++++++++++
 1 file changed, 40 insertions(+)
 create mode 100644 tests/bugs/modalg_6/bug22609

diff --git a/tests/bugs/modalg_6/bug22609 b/tests/bugs/modalg_6/bug22609
new file mode 100644
index 0000000000..6b5a39dd6a
--- /dev/null
+++ b/tests/bugs/modalg_6/bug22609
@@ -0,0 +1,40 @@
+puts "============="
+puts "OCC22609"
+puts "============="
+puts ""
+###########################################################
+# Cut operation between two solids produces not valid shape
+###########################################################
+
+restore [locate_data_file bug22609.brep] s
+
+explode s
+
+checkshape s_1
+tolerance s_1
+
+checkshape s_2
+tolerance s_2
+
+bop s_2 s_1
+bopcut result
+
+checkshape result
+
+checkprops result -s 1.90251e+07 
+
+set nbshapes_expected "
+Number of shapes in result
+ VERTEX    : 68
+ EDGE      : 102
+ WIRE      : 36
+ FACE      : 36
+ SHELL     : 1
+ SOLID     : 1
+ COMPSOLID : 0
+ COMPOUND  : 1
+ SHAPE     : 245
+"
+checknbshapes result -ref ${nbshapes_expected} -t -m "Result obtained by Boolean cut operation"
+
+checkview -display result -2d -path ${imagedir}/${test_image}.png
\ No newline at end of file