T := [.5200000000e-2, .2600000000e-1, .2300000000e-1, .1604000000, .6958000000,
2.195400000, 8.005400000, 22.73360000, 61.27280000];
