puts "TODO OCC12345 ALL: Error on Record" puts "========" puts "OCC205" puts "OCC348" puts "BUC61003" puts "========" ###################################### ## puts "Crash on importing STEP file" ## CS_EXHAUST.stp ###################################### vinit stepread [locate_data_file BUC61003-2.stp] a * tpcompound result checkshape result vdisplay result vsetdispmode 1 vfit set info [trinfo result] regexp { +([-0-9.+eE]+) +triangles} $info full tri regexp { +([-0-9.+eE]+) +nodes} $info full nod if { $tri == 0 || $nod == 0 } { puts "Error : here is shading problem" } set 2dviewer 0