Lines Matching refs:z
144 double z, s,c,ss,cc,r,u,v; in j0() local
160 z = -cos(x+x); in j0()
161 if ((s*c)<zero) cc = z/ss; in j0()
162 else ss = z/cc; in j0()
170 z = (invsqrtpi*cc)/sqrt(x); in j0()
175 z = invsqrtpi*(u*cc-v*ss)/sqrt(x); in j0()
177 return z; in j0()
186 z = x*x; in j0()
187 r = z*(r02+z*(r03+z*(r04+z*r05))); in j0()
188 s = one+z*(s01+z*(s02+z*(s03+z*s04))); in j0()
190 return (one + z*(-0.25+(r/s))); in j0()
193 return ((one+u)*(one-u)+z*(r/s)); in j0()
213 double z, s, c, ss, cc, u, v; in y0() local
257 z = -cos(x+x); in y0()
258 if ((s*c)<zero) cc = z/ss; in y0()
259 else ss = z/cc; in y0()
263 z = (invsqrtpi*ss)/sqrt(x); in y0()
268 z = invsqrtpi*(u*ss+v*cc)/sqrt(x); in y0()
270 return z; in y0()
275 z = x*x; in y0()
276 u = u00+z*(u01+z*(u02+z*(u03+z*(u04+z*(u05+z*u06))))); in y0()
277 v = one+z*(v01+z*(v02+z*(v03+z*v04))); in y0()
358 double z,r,s; in pzero() local
363 z = one/(x*x); in pzero()
364 r = p[0]+z*(p[1]+z*(p[2]+z*(p[3]+z*(p[4]+z*p[5])))); in pzero()
365 s = one+z*(q[0]+z*(q[1]+z*(q[2]+z*(q[3]+z*q[4])))); in pzero()
451 double s,r,z; in qzero() local
456 z = one/(x*x); in qzero()
457 r = p[0]+z*(p[1]+z*(p[2]+z*(p[3]+z*(p[4]+z*p[5])))); in qzero()
458 s = one+z*(q[0]+z*(q[1]+z*(q[2]+z*(q[3]+z*(q[4]+z*q[5]))))); in qzero()