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