Lines Matching refs:pn
47 double pn[6];82 pn[0] = 1.0;83 pn[1] = x;84 pn[2] = x + 1.0;85 pn[3] = x * b;86 gin = pn[2] / pn[3];94 pn[i+4] = b * pn[i+2] - an * pn[i];96 if (pn[5] != 0.0) {97 rn = pn[4] / pn[5];106 pn[i] = pn[i+2];109 if (fabs(pn[4]) >= oflo) {111 pn[i] /= oflo;