From 4201bf79fb8c1022a611cfc1ed779464d1fb170e Mon Sep 17 00:00:00 2001
From: apv <apv@opencascade.com>
Date: Wed, 14 Jun 2017 16:42:49 +0300
Subject: [PATCH] 0023575: Bounding box for a planar edge has non-zero
 dimension in direction orthogonal to an edge plane # Test case
 bugs/moddata_3/bug23575 creation

---
 tests/bugs/moddata_3/bug23575 | 18 ++++++++++++++++++
 1 file changed, 18 insertions(+)
 create mode 100644 tests/bugs/moddata_3/bug23575

diff --git a/tests/bugs/moddata_3/bug23575 b/tests/bugs/moddata_3/bug23575
new file mode 100644
index 0000000000..0e08a8ca66
--- /dev/null
+++ b/tests/bugs/moddata_3/bug23575
@@ -0,0 +1,18 @@
+puts "========"
+puts "OCC23575"
+puts "========"
+puts ""
+##################################################################################################
+# Bounding box for a planar edge has non-zero dimension in direction orthogonal to an edge plane
+##################################################################################################
+
+bsplinecurve c 3 2 0 4 1 4 0 0 0 1 0 1 0 1 1 1 0 1 1 0 0 1
+mkedge e c
+set boundResult [bounding e]
+
+checkreal Xmin [lindex $boundResult 0] 0. 0.1 0.
+checkreal Ymin [lindex $boundResult 1] 0. 0.1 0.
+checkreal Zmin [lindex $boundResult 2] 0. 0.1 0.
+checkreal Xmax [lindex $boundResult 3] 1. 0.1 0.
+checkreal Ymax [lindex $boundResult 4] 1. 0.1 0.
+checkreal Zmax [lindex $boundResult 5] 0. 0.1 0.