40093367 |
1 | puts "TODO OCC22817 All:Faulty shapes in variables faulty_1 to faulty_2" |
2 | #box b -15 -15 -15 15 30 30 |
3 | #beziercurve w 4 0 0 0 10 0 0 10 10 0 20 10 0 |
4 | #mkedge w w |
5 | #wire w w |
6 | #circle profile 0 0 0 1 0 0 10 |
7 | #mkedge profile profile |
8 | #wire profile profile |
9 | #mkplane profile profile |
10 | #pipe p w profile |
11 | #explode b F |
12 | #explode p F |
13 | #glue r p b p_2 b_2 |
14 | #pcylinder c 6 10 |
15 | #ttranslate c -7.5 0 15 |
16 | #explode c F |
17 | #explode r F |
18 | #glue s c r c_3 s_6 |
19 | |
8418c617 |
20 | restore [locate_data_file 6_G56.draw] s |
40093367 |
21 | tscale s 0 0 0 SCALE2 |
22 | fsameparameter s |
23 | explode s E |
24 | mkevol result s |
25 | updatevol s_12 0 6*SCALE2 1 8*SCALE2 2 6*SCALE2 |
26 | buildevol |
27 | |
58cf74e0 |
28 | checkprops result -s 5343.69 |