Lines Matching refs:z
83 double z, s,c,ss,cc,r,u,v; in j0() local
96 z = -cos(x+x); in j0()
97 if ((s*c)<zero) cc = z/ss; in j0()
98 else ss = z/cc; in j0()
104 if(ix>0x48000000) z = (invsqrtpi*cc)/sqrt(x); in j0()
107 z = invsqrtpi*(u*cc-v*ss)/sqrt(x); in j0()
109 return z; in j0()
117 z = x*x; in j0()
118 r = z*(R02+z*(R03+z*(R04+z*R05))); in j0()
119 s = one+z*(S01+z*(S02+z*(S03+z*S04))); in j0()
121 return one + z*(-0.25+(r/s)); in j0()
124 return((one+u)*(one-u)+z*(r/s)); in j0()
145 double z, s,c,ss,cc,u,v; in y0() local
175 z = -cos(x+x); in y0()
176 if ((s*c)<zero) cc = z/ss; in y0()
177 else ss = z/cc; in y0()
179 if(ix>0x48000000) z = (invsqrtpi*ss)/sqrt(x); in y0()
182 z = invsqrtpi*(u*ss+v*cc)/sqrt(x); in y0()
184 return z; in y0()
189 z = x*x; in y0()
190 u = u00+z*(u01+z*(u02+z*(u03+z*(u04+z*(u05+z*u06))))); in y0()
191 v = one+z*(v01+z*(v02+z*(v03+z*v04))); in y0()
273 double z,r,s; in pzero() local
281 z = one/(x*x); in pzero()
282 r = p[0]+z*(p[1]+z*(p[2]+z*(p[3]+z*(p[4]+z*p[5])))); in pzero()
283 s = one+z*(q[0]+z*(q[1]+z*(q[2]+z*(q[3]+z*q[4])))); in pzero()
369 double s,r,z; in qzero() local
377 z = one/(x*x); in qzero()
378 r = p[0]+z*(p[1]+z*(p[2]+z*(p[3]+z*(p[4]+z*p[5])))); in qzero()
379 s = one+z*(q[0]+z*(q[1]+z*(q[2]+z*(q[3]+z*(q[4]+z*q[5]))))); in qzero()