Commit | Line | Data |
---|---|---|
40093367 | 1 | circle w -20 0 0 20 |
2 | mkedge w w 0 pi/2 | |
3 | wire w w | |
4 | polyline profile 0 0 0 10 0 0 5 0 5 0 0 0 | |
5 | mkplane profile profile | |
6 | pipe s w profile | |
7 | tscale s 0 0 0 SCALE1 | |
8 | fsameparameter s SCALE1*1.e-7 | |
9 | explode s E | |
873c119f | 10 | blend result s 1*SCALE1 s_6 1*SCALE1 s_9 1*SCALE1 s_4 |
40093367 | 11 | |
12 | set square 90939.5 |