From 3dffe5f265f4aa888b7f8456c688f5a7562c2512 Mon Sep 17 00:00:00 2001
From: mkv <mkv@opencascade.com>
Date: Fri, 25 Aug 2017 13:35:15 +0300
Subject: [PATCH] 0028195: Boolean common returns empty result for a solid
 where some surfaces of revolution touch the axis

Problem is not reproduced on current master. Issue must be closed on 7.2.0.
Test case was added only
---
 tests/bugs/modalg_7/bug28195_1 | 28 ++++++++++++++++++++++++++++
 tests/bugs/modalg_7/bug28195_2 | 28 ++++++++++++++++++++++++++++
 2 files changed, 56 insertions(+)
 create mode 100644 tests/bugs/modalg_7/bug28195_1
 create mode 100644 tests/bugs/modalg_7/bug28195_2

diff --git a/tests/bugs/modalg_7/bug28195_1 b/tests/bugs/modalg_7/bug28195_1
new file mode 100644
index 0000000000..31f205463b
--- /dev/null
+++ b/tests/bugs/modalg_7/bug28195_1
@@ -0,0 +1,28 @@
+puts "========"
+puts "OCC28195"
+puts "========"
+puts ""
+##################################################################################################
+# Boolean common returns empty result for a solid where some surfaces of revolution touch the axis
+##################################################################################################
+
+restore [locate_data_file bug28195_solidsOK.brep] s
+
+whatis s
+
+explode s
+checkshape s
+bopcheck s_1
+bopcheck s_2
+
+bopargcheck s_1 s_2 -O #F
+bop s_1 s_2
+bopcommon r
+
+whatis r
+explode r
+checkshape r_1
+nbshapes r_1
+
+checkview -display r_1 -2d -path ${imagedir}/${test_image}-2d.png
+checkview -display r_1 -3d -path ${imagedir}/${test_image}-3d.png
diff --git a/tests/bugs/modalg_7/bug28195_2 b/tests/bugs/modalg_7/bug28195_2
new file mode 100644
index 0000000000..3e25d4fb78
--- /dev/null
+++ b/tests/bugs/modalg_7/bug28195_2
@@ -0,0 +1,28 @@
+puts "========"
+puts "OCC28195"
+puts "========"
+puts ""
+##################################################################################################
+# Boolean common returns empty result for a solid where some surfaces of revolution touch the axis
+##################################################################################################
+
+restore [locate_data_file bug28195_solidsKO.brep] s
+
+whatis s
+
+explode s
+checkshape s
+bopcheck s_1
+bopcheck s_2
+
+bopargcheck s_1 s_2 -O #F
+bop s_1 s_2
+bopcommon r
+
+whatis r
+explode r
+checkshape r_1
+nbshapes r_1
+
+checkview -display r_1 -2d -path ${imagedir}/${test_image}-2d.png
+checkview -display r_1 -3d -path ${imagedir}/${test_image}-3d.png