1 puts "========================"
4 puts "========================"
6 restore [locate_data_file OCC327b.brep] result
8 set che [checkshape result r]
9 if { [regexp {OK} $che] == 1 } {
10 puts " OCC327 case 2: OK"
12 puts " OCC327 case 2: Faulty"
15 checkprops result -s 5674.84
16 checkview -display result -2d -path ${imagedir}/${test_image}.png