Searched refs:rn (Results 1 – 1 of 1) sorted by relevance
56 double acu, factor, oflo, gin, term, rn, a, b, an, dif; in i_gamma() local75 rn = p; in i_gamma()78 rn += 1.0; in i_gamma()79 term *= x / rn; in i_gamma()105 rn = pn[4] / pn[5]; in i_gamma()106 dif = fabs(gin - rn); in i_gamma()107 if (dif <= acu && dif <= acu * rn) { in i_gamma()111 gin = rn; in i_gamma()
Completed in 2 milliseconds