77a11d3d |
1 | puts "========" |
2 | puts "OCC28189" |
3 | puts "========" |
4 | puts "" |
5 | ################################################# |
6 | # Result of Boolean operation is non-manifold wire |
7 | ################################################# |
8 | |
9 | box b1 10 10 10 |
10 | box b2 5 5 5 10 10 10 |
11 | box b3 20 0 0 10 10 10 |
12 | box b4 25 5 5 10 10 10 |
13 | shape c1 Cs |
14 | shape c2 Cs |
15 | add b1 c1 |
16 | add b2 c2 |
17 | |
18 | bclearobjects |
19 | bcleartools |
20 | baddobjects c1 b3 |
21 | baddtools c2 b4 |
22 | bfillds |
23 | bbop result 1 |
24 | |
25 | checknbshapes result -solid 2 -compsolid 1 |
26 | |
27 | explode result |
28 | |
29 | if {[regexp "COMPSOLID" [whatis result_1]]} { |
30 | if {![regexp "SOLID" [whatis result_2]]} { |
31 | puts "Error: Incorrect shape types in the result" |
32 | } |
33 | } elseif {[regexp "SOLID" [whatis result_1]]} { |
34 | if {![regexp "COMPSOLID" [whatis result_2]]} { |
35 | puts "Error: Incorrect shape types in the result" |
36 | } |
37 | } else { |
38 | puts "Error: Incorrect shape types in the result" |
39 | } |
40 | |