puts "========================" puts "OCC23567" puts "========================" puts "" ####################################################################### # Wrong STEP unit is returned by STEPControl_Reader.FileUnits() function ####################################################################### set info [ stepfileunits [locate_data_file bug23567_a.step] ] set index1 [lsearch $info metre] puts "" if { ${index1} == -1 } { puts "Error : bad unit" }