Commit | Line | Data |
---|---|---|
40093367 | 1 | #box b -30 -30 -30 60 60 30 |
2 | #ptorus s 20 5 0 90 | |
3 | #fuse f1 s b | |
4 | #pcylinder c 6 45 | |
5 | #trotate c 0 0 0 1 0 0 90 | |
6 | #ttranslate c 0 0 -10 | |
7 | #fuse s f1 c | |
8 | ||
8418c617 | 9 | restore [locate_data_file 6_D56.draw] s |
40093367 | 10 | tscale s 0 0 0 SCALE2 |
11 | explode s E | |
12 | mkevol result s | |
13 | updatevol s_3 0 3*SCALE2 1 8*SCALE2 2 5*SCALE2 | |
14 | buildevol | |
15 | ||
16 | set square 15244.4 |