From: apv <apv@opencascade.com>
Date: Wed, 26 Jul 2017 13:13:39 +0000 (+0300)
Subject: Test for 0024421: Sewing changes orientations of some subshapes.
X-Git-Url: http://git.dev.opencascade.org/gitweb/?a=commitdiff_plain;h=e5555caa1ae812a94dece5d8f537c6edad68d4e0;p=occt-copy.git

Test for 0024421: Sewing changes orientations of some subshapes.
---

diff --git a/tests/bugs/modalg_7/bug24421 b/tests/bugs/modalg_7/bug24421
new file mode 100644
index 0000000000..48dbe8993f
--- /dev/null
+++ b/tests/bugs/modalg_7/bug24421
@@ -0,0 +1,20 @@
+puts "TODO OCC24421 ALL: Faulty shapes in variables faulty_1 to faulty_"
+
+puts "========"
+puts "OCC24421"
+puts "========"
+puts ""
+#################################################
+# Sewing changes orientations of some subshapes
+#################################################
+
+catch {pload XDE}
+
+igesread [locate_data_file bug24421_Rohteil_Pmod.igs] s *
+
+checkshape s
+normals s 100
+sewing r s
+checkshape r
+mkvolume result r
+checkshape result