40093367 |
1 | parabola w1 0 0 0 1 0 0 0 0 1 50 |
2 | mkedge w1 w1 -100 100 |
3 | polyline w2 0 -100 50 0 100 50 |
4 | wire w w1 w2 |
5 | mkplane w w |
6 | prism s w 20 0 100 |
7 | tscale s 0 0 0 SCALE1 |
8 | explode s E |
9 | mkevol result s |
10 | updatevol s_4 0 1*SCALE 1 2*SCALE 2 1*SCALE |
11 | buildevol |
12 | |
13 | set square 5.39403e+06 |