a87752f3 |
1 | |
2 | puts "================" |
3 | puts "OCC337" |
4 | puts "================" |
5 | puts "" |
6 | ############################################ |
7 | ## It's impossible to fuse two solids in the file attached. |
8 | ############################################ |
9 | |
10 | restore [locate_data_file OCC337_clone1.brep] a |
11 | explode a |
12 | |
13 | set che [checkshape a_1] |
14 | |
15 | if { [regexp {Faulty} $che ] == 1 } { |
16 | puts "Faulty OCC337 (shape 1): Source shape is invalid. It was detected by Checkshape command" |
17 | puts "Body of the script was NOT executed" |
18 | renamevar a_1 result |
19 | } else { |
20 | puts "OCC337 OK (shape 1): Source shape is valid" |
21 | set che [checkshape a_2] |
22 | if { [regexp {Faulty} $che ] == 1 } { |
23 | puts "Faulty OCC337 (shape 2): Source shape is invalid. It was detected by Checkshape command" |
24 | puts "Body of the script was NOT executed" |
25 | renamevar a_2 result |
26 | } else { |
27 | puts "OCC337 OK (shape 2): Source shape is valid" |
28 | bfuse result a_1 a_2 |
29 | } |
30 | } |
31 | |
58cf74e0 |
32 | checkprops result -s 35009.9 |
33 | checkshape result |
5747059b |
34 | checkview -display result -2d -path ${imagedir}/${test_image}.png |
a87752f3 |
35 | |
36 | |
37 | |
38 | |