0023087: Upgrade of the OCCT test system
[occt.git] / tests / blend / bfuseblend / A9
diff --git a/tests/blend/bfuseblend/A9 b/tests/blend/bfuseblend/A9
new file mode 100644 (file)
index 0000000..f6a0551
--- /dev/null
@@ -0,0 +1,17 @@
+box b -30 -30 -30 60 60 20
+ellipse w1 0 0 0 15 10
+mkedge w1 w1 0 pi/2
+trotate w1 0 0 0 1 0 0 90
+polyline w2 15 0 0  27 0 -12  0 0 -12  0 0 10
+orientation w2 R
+wire w w1 w2
+revol r w 0 0 0 0 0 1 360
+shape s So
+add r s
+trotate s b 0 0 0 1 1 0 -40
+trotate s b 0 0 0 0 0 1 -10
+tscale b 0 0 0 SCALE1
+tscale s 0 0 0 SCALE1
+bfuseblend result s b 1*SCALE1
+set square 1.29262e+06