0e94a94e |
1 | |
2 | puts "========" |
3 | puts "OCC446" |
4 | puts "OCC447" |
5 | puts "(case 3)" |
6 | puts "========" |
7 | puts "" |
8 | ###################################### |
9 | ## As result I have fail on shape that it is not closed. |
10 | ###################################### |
11 | |
12 | restore [locate_data_file OCC446c.brep] result |
13 | |
14 | set che [checkshape result] |
15 | if { [regexp {Faulty} $che ] == 1} { |
16 | puts "Faulty OCC446 (case 3): Source shape is NotClosed" |
17 | } else { |
18 | puts "OCC446 OK (case 3): Source shape is Closed" |
19 | } |
20 | set square 13694.6 |
82cbc512 |
21 | set 2dviewer 0 |
22 | |
0e94a94e |
23 | |