P6
P6 = -1.05683795988668526689182102605260986731620026832e-0009L,
(P5 + t * (P6 + t * P7)))))));
* (P5 + z * (P6 + z * (P7 + z)));
(P5 + z * (P6 + z * (P7 + z)))));
(P5 + z * (P6 + z * (P7 + z)));
(P5 + z * (P6 + z * (P7 + z)));
(P5 + z * (P6 + z * (P7 + z * (P8 + z * P9)))));
(P6 + z * (P7 + z * (P8 + z * P9)))));
+ (w * w) * (P5 + w * P6 + (w * w) * P7)));
P6 = .000018780048055589639895360927834628371268354778446533203125L,
s##N * (P5 + s##N * P6)))); \
s0 * (P5 + s0 * P6))));
s1 * (P5 + s1 * P6))));
s2 * (P5 + s2 * P6))));
s3 * (P5 + s3 * P6))));