From 64ea47017a9df95aa87c25428cf942367e591b15 Mon Sep 17 00:00:00 2001
From: apv <apv@opencascade.com>
Date: Tue, 25 Jul 2017 17:09:06 +0300
Subject: [PATCH] Test for 0024215: Error in offset (bad curve)

---
 tests/bugs/modalg_7/bug24215 | 27 +++++++++++++++++++++++++++
 1 file changed, 27 insertions(+)
 create mode 100644 tests/bugs/modalg_7/bug24215

diff --git a/tests/bugs/modalg_7/bug24215 b/tests/bugs/modalg_7/bug24215
new file mode 100644
index 0000000000..71319ffb5b
--- /dev/null
+++ b/tests/bugs/modalg_7/bug24215
@@ -0,0 +1,27 @@
+puts "TODO OCC24215 ALL: ERROR: OCC24215 is reproduced."
+
+puts "========"
+puts "OCC24215"
+puts "========"
+puts ""
+###############################
+# Error in offset (bad curve)
+###############################
+
+restore [locate_data_file bug24215_face-10-012.brep] f
+
+mkoffset o f 1 0.4
+
+set bug_info [lprops o_1]
+
+# Length of o_1 SHOULD be less 58.8412 because offset is wrong and consists loop
+# "if" statement SHOULD be corrected than issue will be fixed
+if {[lindex $bug_info 2] == 58.8412} {
+  puts "ERROR: OCC24215 is reproduced."
+}
+
+vinit
+vdisplay f
+vdisplay o_1
+vfit
+checkview -screenshot -3d -path ${imagedir}/${test_image}.png
-- 
2.39.5