puts "============" puts "OCC6063" puts "============" puts "" ###################################################### # Exception is raised during command "sprops" in DRAW on attached shape. ###################################################### set BugNumber OCC6063 cpulimit 2000 restore [locate_data_file OCC6063-2.brep] result decho off set che_res [checkshape result] decho on if { [regexp {Faulty} $che_res] } { puts "Faulty ${BugNumber} : checkshape is wrong for res" } set tol_square 1.e-6 set square 2465.96 set 2dviewer 0