Lines Matching refs:y

165 	double y,z;  local
171 	y = -x;		/* x is assume negative */
177 	z = ieee_floor(y);
178 	if(z!=y) {				/* inexact anyway */
179 	    y  *= 0.5;
180 	    y   = 2.0*(y - ieee_floor(y));		/* y = |x| mod 2.0 */
181 	    n   = (int) (y*4.0);
184                 y = zero; n = 0;                 /* y must be even */
186                 if(ix<0x43300000) z = y+two52;	/* exact */
188                 y  = n;
193 	    case 0:   y =  __kernel_sin(pi*y,zero,0); break;
195 	    case 2:   y =  __kernel_cos(pi*(0.5-y),zero); break;
197 	    case 4:   y =  __kernel_sin(pi*(one-y),zero,0); break;
199 	    case 6:   y = -__kernel_cos(pi*(y-1.5),zero); break;
200 	    default:  y =  __kernel_sin(pi*(y-2.0),zero,0); break;
202 	return -y;
213 	double t,y,z,nadj,p,p1,p2,p3,q,r,w;  local
246 		if(ix>=0x3FE76944) {y = one-x; i= 0;}
247 		else if(ix>=0x3FCDA661) {y= x-(tc-one); i=1;}
248 	  	else {y = x; i=2;}
251 	        if(ix>=0x3FFBB4C3) {y=2.0-x;i=0;} /* [1.7316,2] */
252 	        else if(ix>=0x3FF3B4C4) {y=x-tc;i=1;} /* [1.23,1.73] */
253 		else {y=x-one;i=2;}
257 		z = y*y;
260 		p  = y*p1+p2;
261 		r  += (p-0.5*y); break;
263 		z = y*y;
264 		w = z*y;
268 		p  = z*p1-(tt-w*(p2+y*p3));
271 		p1 = y*(u0+y*(u1+y*(u2+y*(u3+y*(u4+y*u5)))));
272 		p2 = one+y*(v1+y*(v2+y*(v3+y*(v4+y*v5))));
273 		r += (-0.5*y + p1/p2);
279 	    y = x-(double)i;
280 	    p = y*(s0+y*(s1+y*(s2+y*(s3+y*(s4+y*(s5+y*s6))))));
281 	    q = one+y*(r1+y*(r2+y*(r3+y*(r4+y*(r5+y*r6)))));
282 	    r = half*y+p/q;
285 	    case 7: z *= (y+6.0);	/* FALLTHRU */
286 	    case 6: z *= (y+5.0);	/* FALLTHRU */
287 	    case 5: z *= (y+4.0);	/* FALLTHRU */
288 	    case 4: z *= (y+3.0);	/* FALLTHRU */
289 	    case 3: z *= (y+2.0);	/* FALLTHRU */
296 	    y = z*z;
297 	    w = w0+z*(w1+y*(w2+y*(w3+y*(w4+y*(w5+y*w6)))));