B8
(B7 + s * (B8 + s))));
(B7 + s * (B8 + s)))));
(B7 + s * (B8 + s)))));
(B7 + s * (B8 + s)))));
(B7 + s * (B8 + s)))));
(B7 + s * (B8 + s)))));
B8 = 1.176460904783899064854645174603360383792e-0001L,
z * (B5 + z * (B6 + z * (B7 + z * (B8 + z * B9))))))))));
B8 = 1.176460904783899064854645174603360383792e-0001L,
z * (B8 + z * B9))))))))));
B8 = 1.176469984587418890634302788283946761670e-0001L,
v * (B5 + v * (B6 + v * (B7 + v * (B8 + v * B9)))))))));