44 	float z, s,c,ss,cc,r,u,v;  in __ieee754_j0f()  local
57 		    z = -cosf(x+x);  in __ieee754_j0f()
58 		    if ((s*c)<zero) cc = z/ss;  in __ieee754_j0f()
59 		    else 	    ss = z/cc;  in __ieee754_j0f()
65 		if(ix>0x80000000) z = (invsqrtpi*cc)/sqrtf(x);  in __ieee754_j0f()
68 		    z = invsqrtpi*(u*cc-v*ss)/sqrtf(x);  in __ieee754_j0f()
70 		return z;  in __ieee754_j0f()
78 	z = x*x;  in __ieee754_j0f()
79 	r =  z*(R02+z*(R03+z*(R04+z*R05)));  in __ieee754_j0f()
80 	s =  one+z*(S01+z*(S02+z*(S03+z*S04)));  in __ieee754_j0f()
82 	    return one + z*((float)-0.25+(r/s));  in __ieee754_j0f()
85 	    return((one+u)*(one-u)+z*(r/s));  in __ieee754_j0f()
105 	float z, s,c,ss,cc,u,v;  in __ieee754_y0f()  local
135                     z = -cosf(x+x);  in __ieee754_y0f()
136                     if ((s*c)<zero) cc = z/ss;  in __ieee754_y0f()
137                     else            ss = z/cc;  in __ieee754_y0f()
139                 if(ix>0x80000000) z = (invsqrtpi*ss)/sqrtf(x);  in __ieee754_y0f()
142                     z = invsqrtpi*(u*ss+v*cc)/sqrtf(x);  in __ieee754_y0f()
144                 return z;  in __ieee754_y0f()
149 	z = x*x;  in __ieee754_y0f()
150 	u = u00+z*(u01+z*(u02+z*(u03+z*(u04+z*(u05+z*u06)))));  in __ieee754_y0f()
151 	v = one+z*(v01+z*(v02+z*(v03+z*v04)));  in __ieee754_y0f()
230 	float z,r,s;  in pzerof()  local
238 	z = one/(x*x);  in pzerof()
239 	r = p[0]+z*(p[1]+z*(p[2]+z*(p[3]+z*(p[4]+z*p[5]))));  in pzerof()
240 	s = one+z*(q[0]+z*(q[1]+z*(q[2]+z*(q[3]+z*q[4]))));  in pzerof()
325 	float s,r,z;  in qzerof()  local
333 	z = one/(x*x);  in qzerof()
334 	r = p[0]+z*(p[1]+z*(p[2]+z*(p[3]+z*(p[4]+z*p[5]))));  in qzerof()
335 	s = one+z*(q[0]+z*(q[1]+z*(q[2]+z*(q[3]+z*(q[4]+z*q[5])))));  in qzerof()