From 9d9edcf49dd30dcae3081022fdc1f2bc5f6af4bc Mon Sep 17 00:00:00 2001
From: emv <emv@opencascade.com>
Date: Wed, 25 Nov 2020 08:18:13 +0300
Subject: [PATCH] 0031913: Modeling Algorithms - Invalid result of cut
 operation

Fixed by 0029711. Integrating test case only.
---
 tests/bugs/modalg_7/bug31913 | 25 +++++++++++++++++++++++++
 1 file changed, 25 insertions(+)
 create mode 100644 tests/bugs/modalg_7/bug31913

diff --git a/tests/bugs/modalg_7/bug31913 b/tests/bugs/modalg_7/bug31913
new file mode 100644
index 0000000000..97e873da70
--- /dev/null
+++ b/tests/bugs/modalg_7/bug31913
@@ -0,0 +1,25 @@
+puts "============================================================================================="
+puts "0031913: Modeling Algorithms - Invalid result of cut operation"
+puts "============================================================================================="
+puts ""
+
+restore [locate_data_file bug31913_shell_to_cut.brep] s1
+restore [locate_data_file bug31913_cutting_solid.brep] s2
+
+bclearobjects
+bcleartools
+baddobjects s1
+baddtools s2
+bfillds
+bbop rcommon 0
+bbop rcut 2
+
+checkshape rcommon
+checknbshapes rcommon -face 17 -wire 17
+checkprops rcommon -s 0.0317669
+
+checkshape rcut
+checknbshapes rcut -face 73 -wire 73
+checkprops rcut -s 39.1577
+
+checkview -display rcommon -2d -path ${imagedir}/${test_image}.png