1 puts "TODO OCC12345 ALL: Error on Record"
8 ######################################
9 ## puts "Crash on importing STEP file"
11 ######################################
14 stepread [locate_data_file BUC61003-1.stp] a *
23 set info [trinfo result]
24 regexp { +([-0-9.+eE]+) +triangles} $info full tri
25 regexp { +([-0-9.+eE]+) +nodes} $info full nod
27 if { $tri == 0 || $nod == 0 } {
28 puts "Error : here is shading problem"