__poly_libmq
long double __poly_libmq(x,n,p)
__poly_libmq(long double x, int n, const long double p[]) {