Lines Matching refs:z
84 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*((r/s)-qrtr); in j0()
124 return((one+u)*(one-u)+z*(r/s)); in j0()
144 double z, s,c,ss,cc,u,v; in y0() local
179 z = -cos(x+x); in y0()
180 if ((s*c)<zero) cc = z/ss; in y0()
181 else ss = z/cc; in y0()
183 if(ix>0x48000000) z = (invsqrtpi*ss)/sqrt(x); in y0()
186 z = invsqrtpi*(u*ss+v*cc)/sqrt(x); in y0()
188 return z; in y0()
193 z = x*x; in y0()
194 u = u00+z*(u01+z*(u02+z*(u03+z*(u04+z*(u05+z*u06))))); in y0()
195 v = one+z*(v01+z*(v02+z*(v03+z*v04))); in y0()
276 double z,r,s; in pzero() local
284 z = one/(x*x); in pzero()
285 r = p[0]+z*(p[1]+z*(p[2]+z*(p[3]+z*(p[4]+z*p[5])))); in pzero()
286 s = one+z*(q[0]+z*(q[1]+z*(q[2]+z*(q[3]+z*q[4])))); in pzero()
373 double s,r,z; in qzero() local
381 z = one/(x*x); in qzero()
382 r = p[0]+z*(p[1]+z*(p[2]+z*(p[3]+z*(p[4]+z*p[5])))); in qzero()
383 s = one+z*(q[0]+z*(q[1]+z*(q[2]+z*(q[3]+z*(q[4]+z*q[5]))))); in qzero()