f1aa2b62 |
1 | puts "========" |
2 | puts "OCC571" |
3 | puts "========" |
4 | puts "" |
5 | ########################## |
6 | ## Fillet operation fails on given shape |
7 | ########################## |
8 | ## LIMITATION: Builds fillet with 0.03<=r<=1.2 |
9 | ########################## |
10 | |
11 | restore [locate_data_file OCC571.brep] a |
352ffd73 |
12 | checkshape a |
f1aa2b62 |
13 | explode a |
14 | |
15 | if [catch {fillet result a_1 0.03 a_2 } catch_result] { |
16 | puts "Faulty OCC571 exception (case 2): Fillet operation fails on given shape " |
17 | } else { |
18 | puts " OCC571 (case 2) OK: Fillet operation was made" |
19 | } |
20 | |
21 | set square 21209.9 |
22 | set 2dviewer 0 |