two4
u.d = d = two4 + zz[0];
zz[0] -= (d - two4);
u.d = d = two4 + zz[0];
zz[0] -= (d - two4);
u.d = d = two4 + zz[0];
zz[0] -= (d - two4);
two4 = 1.60000000000000000000e+01,
u.d = two4 + (s[0] + t);
s[0] -= (u.d - two4);