Lines Matching refs:z
157 double z, p; local
160 z = one/(x*x);
161 p = Pa0+z*(Pa1+z*(Pa2+z*(Pa3+z*(Pa4+z*(Pa5+z*(Pa6+z*Pa7))))));
246 ratfun_gam(z, c) in ratfun_gam() argument
247 double z, c; in ratfun_gam()
252 q = Q0 +z*(Q1+z*(Q2+z*(Q3+z*(Q4+z*(Q5+z*(Q6+z*(Q7+z*Q8)))))));
253 p = P0 + z*(P1 + z*(P2 + z*(P3 + z*P4)));
257 t.a = z, TRUNC(t.a); /* t ~= z + c */
258 t.b = (z - t.a) + c;
259 t.b *= (t.a + z);
278 double y, z; local
283 z = y - x;
284 if (z > 0.5)
285 z = one - z;
289 if (z < .25)
290 z = sin(M_PI*z);
292 z = cos(M_PI*(0.5-z));
299 lsine = __log__D(M_PI/z); /* = TRUNC(log(u)) + small */
303 z = (y + lg.a) + lg.b;
304 y = __exp__D(y, z);
314 return (M_PI / (y*z));