0024593: Missing surfaces from STL output
[occt.git] / tests / bugs / mesh / bug24593_2
diff --git a/tests/bugs/mesh/bug24593_2 b/tests/bugs/mesh/bug24593_2
new file mode 100644 (file)
index 0000000..c2a4efa
--- /dev/null
@@ -0,0 +1,32 @@
+puts "========"
+puts "OCC24593"
+puts "========"
+puts ""
+#####################################
+# Missing surfaces from STL output
+#####################################
+
+pload XDE
+
+set refnbfaces 23
+
+stepread [locate_data_file bug24593_281946.stp] a *
+renamevar a_1 result
+
+#1
+checkview -display result -3d -path ${imagedir}/${test_image}.png
+
+#2
+set log1 [explode result f]
+set nbfaces [llength $log1]
+
+#3
+set log2 [tricheck result]
+
+if { $nbfaces != $refnbfaces } {
+  puts "Error : Shape restored incorrectly - number of faces is different than expected value ($nbfaces != $refnbfaces)"
+}
+
+if { [llength $log2] != 0 } {
+  puts "Error : Some faces has failed to mesh"
+}
\ No newline at end of file