5 #######################################################################
6 ## Faulty shape after IGES translation with xstep.cascade.unit set to M
7 #######################################################################
9 pload DATAEXCHANGEKERNEL
11 param xstep.cascade.unit M
13 igesread [locate_data_file bug24549_Hull_B.igs] result *
15 regexp {Tolerance +MAX=([-0-9.+eE]+)} [tolerance result] full MaxTol_1
17 puts "MaxTolerance = $MaxTol_1"
21 if { ${MaxTol_1} > ${MaxTol} } {
22 puts "Faulty : bad tolerance"
24 puts "OK : good tolerance"