Adding of testing cases from subgroups 937 940 and 941 of CHL group

[occt.git] / tests / bugs / modalg_3 / begin

diff --git a/tests/bugs/modalg_3/begin b/tests/bugs/modalg_3/begin
new file mode 100755 (executable)
index 0000000..f40c35f
--- /dev/null
+++ b/tests/bugs/modalg_3/begin
@@ -0,0 +1,20 @@
+set subgroup modalg
+
+set calcul "p"
+set type "i"
+
+proc OFFSETSHAPE {distance faces calcul type} {
+        uplevel #0 explode s f
+        uplevel #0 offsetparameter 1e-7 $calcul $type
+        uplevel #0 offsetload s $distance $faces
+        uplevel #0 offsetperform result
+}
+
+
+
+
+
+
+
+
+