T := [.7000000000e-2, .1660000000e-1, .4540000000e-1, .2812000000, .4090000000,
.1876000000, 20.44840000, .1432000000, 3.426000000, 518.1528000];
