352ffd73 |
1 | puts "================" |
2 | puts "OCC693" |
3 | puts "================" |
4 | puts "" |
5 | ################################################### |
6 | ## The boolean operations give incorrect result if one of shapes is compound |
7 | ## consisting of several adjoint solids |
8 | #################################################### |
9 | |
10 | box h1 234 52 0 41 98 40 |
11 | box v1 241 136 20 31 31 15 |
12 | box h3 215 120 20 78 15 15 |
13 | |
14 | compound h1 c1 |
15 | compound v1 c2 |
16 | |
17 | tcopy c1 cc1 |
18 | tcopy c2 cc2 |
19 | |
20 | bop cc1 cc2 |
21 | bopcommon int1 |
22 | |
23 | checkshape -top int1 |
24 | |
25 | tcopy c1 cc1 |
26 | tcopy c2 cc2 |
27 | |
28 | bop cc1 cc2 |
29 | bopcut cut1 |
30 | |
31 | checkshape -top cut1 |
32 | |
33 | tcopy c1 cc1 |
34 | tcopy c2 cc2 |
35 | |
36 | bop cc2 cc1 |
37 | bopcut cut2 |
38 | |
39 | checkshape -top cut2 |
40 | |
41 | compound int1 cut1 cut2 comp3 |
42 | |
43 | checkshape -top comp3 |
44 | |
45 | tcopy comp3 ccomp3 |
46 | tcopy h3 ch3 |
47 | |
48 | bop ccomp3 ch3 |
49 | bopcommon int2 |
50 | |
51 | checkshape -top int2 |
52 | |
53 | tcopy comp3 ccomp3 |
54 | tcopy h3 ch3 |
55 | |
56 | bop ccomp3 ch3 |
57 | bopcut cut3 |
58 | |
59 | checkshape -top cut3 |
60 | |
61 | tcopy comp3 ccomp3 |
62 | tcopy h3 ch3 |
63 | |
64 | bop ch3 ccomp3 |
65 | bopcut cut4 |
66 | |
67 | checkshape -top cut4 |
68 | |
69 | compound int2 cut3 cut4 result |
70 | |
71 | checkshape -top result |
72 | |
58cf74e0 |
73 | checkprops result -s 33196 |
74 | checkshape result |
5747059b |
75 | checkview -display result -3d -path ${imagedir}/${test_image}.png |
352ffd73 |
76 | |