56062e13 |
1 | puts "==============================================================" |
2 | puts "OCC27928: BOP common produces empty compound" |
3 | puts "==============================================================" |
340054e1 |
4 | |
5 | restore [locate_data_file bug27928_b1.brep] b1 |
6 | restore [locate_data_file bug27928_b2.brep] b2 |
7 | |
56062e13 |
8 | bclearobjects |
9 | bcleartools |
10 | baddobjects b1 |
11 | baddtools b2 |
12 | bfillds |
13 | |
14 | bbop r0 0 |
15 | bbop r1 1 |
16 | bbop r2 2 |
17 | bbop r3 3 |
18 | bbop r4 4 |
340054e1 |
19 | |
56062e13 |
20 | foreach r {r0 r1 r2 r3 r4} { |
21 | checkshape $r |
22 | if {![regexp "OK" [bopcheck $r]]} { |
23 | puts "Error: the result of BOP is self-interfering shape" |
24 | } |
340054e1 |
25 | } |
56062e13 |
26 | |
27 | checknbshapes r0 -wire 8 -face 8 -shell 1 -solid 1 |
28 | checkprops r0 -s 21820.6 -v 221499 |
29 | |
30 | checknbshapes r1 -wire 14 -face 14 -shell 1 -solid 1 |
31 | checkprops r1 -s 22455.1 -v 224813 |
32 | |
33 | checknbshapes r2 -wire 5 -face 5 -shell 1 -solid 1 |
34 | checkprops r2 -s 2075.44 -v 1489.33 |
35 | |
36 | checknbshapes r3 -wire 5 -face 5 -shell 1 -solid 1 |
37 | checkprops r3 -s 2521.83 -v 1824.69 |
38 | |
39 | checknbshapes r4 -vertex 12 -edge 18 -t |
40 | checkprops r4 -l 825.645 |
41 | |
42 | checkview -display r0 -2d -path ${imagedir}/${test_image}.png |