__poly_libmq
t = __poly_libmq(s,21,P);
t = C1+__poly_libmq(s,12,P1)/(one+s*__poly_libmq(s,12,Q1));
t = C2+__poly_libmq(s,12,P2)/(one+s*__poly_libmq(s,13,Q2));
t = t - x*__poly_libmq(s,21,P);
return t - __poly_libmq(s,12,P1)/(one+s*__poly_libmq(s,12,Q1));
return t - __poly_libmq(s,12,P2)/(one+s*__poly_libmq(s,13,Q2));
y = __poly_libmq(x,15,R2);
t = y/__poly_libmq(x,16,S2);
y = __poly_libmq(x,14,R1);
t = y/__poly_libmq(x,15,S1);
extern long double __poly_libmq(long double, int, long double *);
t = __poly_libmq(s,21,P);
t = C1+__poly_libmq(s,12,P1)/(one+s*__poly_libmq(s,12,Q1));
t = C2+__poly_libmq(s,12,P2)/(one+s*__poly_libmq(s,13,Q2));
t = t - x*__poly_libmq(s,21,P);
return t - __poly_libmq(s,12,P1)/(one+s*__poly_libmq(s,12,Q1));
return t - __poly_libmq(s,12,P2)/(one+s*__poly_libmq(s,13,Q2));
y = __poly_libmq(x,15,R2);
t = y/__poly_libmq(x,16,S2);
y = __poly_libmq(x,14,R1);
t = y/__poly_libmq(x,15,S1);
extern long double __poly_libmq(long double, int, const long double *);