f1aa2b62 |
1 | |
2 | puts "========================" |
3 | puts " OCC616" |
4 | puts "========================" |
5 | puts "" |
6 | ######################################## |
7 | ## Function MKOFFSET gives exception for attached face |
8 | ######################################## |
9 | |
10 | restore [locate_data_file OCC616.brep] a |
352ffd73 |
11 | checkshape a |
f1aa2b62 |
12 | |
13 | if { [catch {mkoffset result a 5 -2} catch_result] } { |
14 | puts "Faulty OCC616: function MKOFFSET works with exception" |
15 | } else { |
16 | renamevar result_1 result |
352ffd73 |
17 | checkshape result |
f1aa2b62 |
18 | puts "OCC616 OK: function MKOFFSET works OK" |
19 | } |
20 | |
21 | set length 1062.78 |
22 | set 2dviewer 0 |