0023105: Exception during Meshing / Missing triangles

[occt.git] / tests / bugs / mesh / bug23105

diff --git a/tests/bugs/mesh/bug23105 b/tests/bugs/mesh/bug23105
new file mode 100755 (executable)
index 0000000..f93ece9
--- /dev/null
+++ b/tests/bugs/mesh/bug23105
@@ -0,0 +1,25 @@
+puts "================"
+puts "CR23105"
+puts "================"
+puts ""
+###############################################
+## Exception during Meshing / Missing triangles
+###############################################
+
+restore [locate_data_file bug23105_f372.brep] result
+checkshape result
+
+incmesh result 0.1
+set trinfo_s [trinfo result]
+regexp {([0-9]+) triangles} $trinfo_s str nbtri_s
+regexp {deflection ([0-9.+e-]+)} $trinfo_s str defl_s
+
+# check deflections
+if { $defl_s > 0.1 } {
+    puts "Error: too big deflection ($defl_s > 0.1)"
+}
+
+# compare number of triangles
+if { $nbtri_s == 0 } {
+    puts "Error: shape contains 0 triangles"
+}