Lines Matching +full:tx +full:- +full:180

27 #define	BIAS	(LDBL_MAX_EXP - 1)
32  * pio2_1t:  pi/2 - pio2_1
34  * pio2_2t:  pi/2 - (pio2_1+pio2_2)
36  * pio2_3t:  pi/2 - (pio2_1+pio2_2+pio2_3)
43 pio2_2  = -1.07463465549783099519e-12,	/* -0x12e7b967674000.0p-92 */
44 pio2_3  =  6.36831716351370313614e-25;	/*  0x18a2e037074000.0p-133 */
49 invpio2hi =  6.3661977236758138e-01,	/*  0x145f306dc9c883.0p-53 */
50 invpio2lo = -3.9356538861223811e-17,	/* -0x16b00000000000.0p-107 */
51 pio2_1thi = -1.0746346554971943e-12,	/* -0x12e7b9676733af.0p-92 */
52 pio2_1tlo =  8.8451028997905949e-29,	/*  0x1c080000000000.0p-146 */
53 pio2_2thi =  6.3683171635109499e-25,	/*  0x18a2e03707344a.0p-133 */
54 pio2_2tlo =  2.3183081793789774e-41,	/*  0x10280000000000.0p-187 */
55 pio2_3thi = -2.7529965190440717e-37,	/* -0x176b7ed8fbbacc.0p-174 */
56 pio2_3tlo = -4.2006647512740502e-54;	/* -0x19c00000000000.0p-230 */
63 invpio2 =  6.36619772367581343076e-01L,	/*  0xa2f9836e4e44152a.0p-64 */
64 pio2_1t = -1.07463465549719416346e-12L,	/* -0x973dcb3b399d747f.0p-103 */
65 pio2_2t =  6.36831716351095013979e-25L,	/*  0xc51701b839a25205.0p-144 */
66 pio2_3t = -2.75299651904407171810e-37L;	/* -0xbb5bf6c7ddd660ce.0p-185 */
74 	double tx[3],ty[2];
85 	    r  = x-fn*pio2_1;
91 	        y[0] = r-w; 
94 	        i = j-ex1;
98 		    r  = t-w;
99 		    w  = fn*pio2_2t-((t-r)-w);	
100 		    y[0] = r-w;
103 		    i = j-ex1;
104 		    if(i>61) {	/* 3rd iteration need, 180 bits acc */
107 		    	r  = t-w;
108 		    	w  = fn*pio2_3t-((t-r)-w);	
109 		    	y[0] = r-w;
113 	    y[1] = (r-y[0])-w;
120 	    y[0]=y[1]=x-x; return 0;
122     /* set z = scalbn(|x|,ilogb(x)-23) */
124 	e0 = ex - BIAS - 23;		/* e0 = ilogb(|x|)-23; */
125 	u1.xbits.expsign = ex - e0;
128 		tx[i] = (double)((int32_t)(z));
129 		z     = (z-tx[i])*two24;
131 	tx[2] = z;
133 	while(tx[nx-1]==zero) nx--;	/* skip zero term */
134 	n  =  __kernel_rem_pio2(tx,ty,e0,nx,2);
136 	w = ty[1] - (r - ty[0]);
137 	if(expsign<0) {y[0] = -r; y[1] = -w; return -n;}