f1aa2b62 |
1 | |
2 | puts "=======" |
3 | puts "OCC890" |
4 | puts "SAM1681" |
5 | puts "=======" |
6 | puts "" |
7 | ############################## |
8 | ## No possibility to fuse the attached prisms. |
9 | ############################## |
10 | |
11 | restore [locate_data_file OCC890.brep] a |
12 | explode a |
13 | |
352ffd73 |
14 | checkshape a_1 |
15 | checkshape a_2 |
f1aa2b62 |
16 | |
17 | if { [ catch { bfuse result a_1 a_2 } catch_result ] } { |
18 | puts "Faulty OCC890 (case 3)" |
19 | } |
20 | |
58cf74e0 |
21 | checkprops result -s 1.8276e+06 |
22 | checkshape result |
5747059b |
23 | checkview -display result -2d -path ${imagedir}/${test_image}.png |