1 puts "========================"
4 puts "========================"
6 #################################################################
7 ## After performing command "checkbrep" to attached face I receive "Bad Orientation of Subshape"
8 ## but I believe that orientation of this face is correct.
9 #################################################################
11 restore [locate_data_file OCC302b.brep] result
13 set che [checkshape result r]
14 if { [regexp {OK} $che] != 1} {
15 puts "Faulty OCC302 (case 2): command checkbrep works wrongly"
17 puts "OCC302 OK (case 2) : command checkbrep works properly"