data1 = 'td097237.dat' params = 'td097237.par' results = 'td097237.res' prvar = 1.0 iters = 50.0 fair = 0.9499999 tol = 0.00001 END