0030958: BRepOffsetAPI_ThruSections operation raises an exception while building...
[occt.git] / tests / bugs / modalg_7 / bug30958
diff --git a/tests/bugs/modalg_7/bug30958 b/tests/bugs/modalg_7/bug30958
new file mode 100644 (file)
index 0000000..3fc93eb
--- /dev/null
@@ -0,0 +1,43 @@
+puts "=========================================================================================="
+puts "OCC30958: BRepOffsetAPI_ThruSections operation raises an except-ion while building history"
+puts "=========================================================================================="
+puts ""
+
+restore [locate_data_file bug30958_CompWires.brep] ww
+explode ww
+
+thrusections res 0 1 ww_1 ww_2
+
+savehistory hist
+
+explode ww_1
+
+generated r1 hist ww_1_1
+generated r2 hist ww_1_2
+
+checkprops r1 -s 22.4404
+checkprops r2 -s 81.2396
+
+explode ww_1 v
+
+generated rr1 hist ww_1_1
+generated rr2 hist ww_1_2
+generated rr3 hist ww_1_3
+
+distmini dd ww_1_1 rr1
+regexp {([-0-9.+eE]+)} [dump dd_val] full dist
+if { $dist > 1.e-7} {
+   puts "Error: wrong generated list of edges"
+}
+
+distmini dd ww_1_2 rr2
+regexp {([-0-9.+eE]+)} [dump dd_val] full dist
+if { $dist > 1.e-7} {
+   puts "Error: wrong generated list of edges"
+}
+
+distmini dd ww_1_3 rr3
+regexp {([-0-9.+eE]+)} [dump dd_val] full dist
+if { $dist > 1.e-7} {
+   puts "Error: wrong generated list of edges"
+}