681cfe76 |
1 | puts "============" |
2 | puts "OCC26098" |
3 | puts "============" |
4 | puts "" |
5 | ############################### |
6 | ## The result of General Fuse operation is self-interfered shape |
7 | ############################### |
8 | |
9 | restore [locate_data_file bug26098_c.brep ] c |
10 | |
11 | explode c |
12 | |
13 | bclearobjects |
14 | bcleartools |
15 | baddobjects c_1 |
16 | baddtools c_2 c_3 c_4 c_5 |
17 | |
18 | bfillds |
19 | bbuild result |
20 | |
21 | set info [bopcheck result] |
22 | |
23 | if { [regexp "This shape seems to be OK" ${info}] != 1 } { |
24 | puts "Error : The result of General Fuse operation is self-interfered shape" |
25 | } |
26 | |
58cf74e0 |
27 | checkprops result -s 173.444 |
28 | checkshape result |
681cfe76 |
29 | |
30 | set nbshapes_expected " |
31 | Number of shapes in shape |
32 | VERTEX : 230 |
33 | EDGE : 400 |
34 | WIRE : 196 |
35 | FACE : 185 |
36 | SHELL : 20 |
37 | SOLID : 20 |
38 | COMPSOLID : 0 |
39 | COMPOUND : 1 |
40 | SHAPE : 1052 |
41 | " |
42 | |
43 | checknbshapes result -ref ${nbshapes_expected} -t -m "Result obtained by General Fuse operator" |
5747059b |
44 | checkview -display result -3d -path ${imagedir}/${test_image}.png |