Commit | Line | Data |
---|---|---|
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 | ||
21 | set square 1.8276e+06 | |
22 | set 2dviewer 0 |