Commit | Line | Data |
---|---|---|
3cdfdc9a | 1 | puts "TODO ?OCC24156 MacOS: TEST INCOMPLETE" |
2 | ||
40093367 | 3 | #pcylinder s1 5 20 |
4 | #pcylinder s2 5 12 | |
5 | #ttranslate s2 5 0 3 | |
6 | #ttranslate s1 s2 5 5 0 | |
7 | #fuse s s1 s2 | |
8 | #save s I5678.draw | |
9 | ||
8418c617 | 10 | restore [locate_data_file I5678.draw] s |
40093367 | 11 | tscale s 0 0 0 SCALE1 |
12 | explode s e | |
13 | blend result s 0.5*SCALE1 s_4 0.5*SCALE1 s_5 0.5*SCALE1 s_13 | |
14 | ||
15 | set square 99977 |