Lines Matching refs:fp1
233 floatx80 fp0, fp1, fp2, fp3, f, logof2, klog2, saveu; in floatx80_lognp1() local
277 fp1 = a; in floatx80_lognp1()
290 fp1 = int32_to_floatx80(k, status); in floatx80_lognp1()
304 klog2 = floatx80_mul(fp1, logof2, status); /* FP1 IS K*LOG2 */ in floatx80_lognp1()
308 fp1 = fp2; in floatx80_lognp1()
310 fp1 = floatx80_mul(fp1, float64_to_floatx80( in floatx80_lognp1()
316 fp1 = floatx80_add(fp1, float64_to_floatx80( in floatx80_lognp1()
322 fp1 = floatx80_mul(fp1, fp3, status); /* V*(A4+V*A6) */ in floatx80_lognp1()
324 fp1 = floatx80_add(fp1, float64_to_floatx80( in floatx80_lognp1()
330 fp1 = floatx80_mul(fp1, fp3, status); /* V*(A2+V*(A4+V*A6)) */ in floatx80_lognp1()
332 fp1 = floatx80_mul(fp1, fp0, status); /* U*V*(A2+V*(A4+V*A6)) */ in floatx80_lognp1()
335 fp1 = floatx80_add(fp1, log_tbl[j + 1], in floatx80_lognp1()
337 fp0 = floatx80_add(fp0, fp1, status); /* FP0 IS LOG(F) + LOG(1+U) */ in floatx80_lognp1()
358 fp0 = floatx80_add(fp0, fp1, status); /* FP0 IS Y-F = (1-F)+Z */ in floatx80_lognp1()
359 fp1 = packFloatx80(0, 0, 0); /* K = 0 */ in floatx80_lognp1()
364 fp1 = floatx80_add(fp1, fp1, status); /* 2Z */ in floatx80_lognp1()
365 fp0 = floatx80_add(fp0, fp1, status); /* FP0 IS Y-F = (2-F)+2Z */ in floatx80_lognp1()
366 fp1 = packFloatx80(1, one_exp, one_sig); /* K = -1 */ in floatx80_lognp1()
371 fp1 = floatx80_add(fp1, fp1, status); /* FP1 IS 2Z */ in floatx80_lognp1()
376 fp1 = floatx80_div(fp1, fp0, status); /* U */ in floatx80_lognp1()
377 saveu = fp1; in floatx80_lognp1()
378 fp0 = floatx80_mul(fp1, fp1, status); /* FP0 IS V = U*U */ in floatx80_lognp1()
379 fp1 = floatx80_mul(fp0, fp0, status); /* FP1 IS W = V*V */ in floatx80_lognp1()
385 fp3 = floatx80_mul(fp3, fp1, status); /* W*B5 */ in floatx80_lognp1()
386 fp2 = floatx80_mul(fp2, fp1, status); /* W*B4 */ in floatx80_lognp1()
393 fp1 = floatx80_mul(fp1, fp3, status); /* W*(B3+W*B5) */ in floatx80_lognp1()
395 fp1 = floatx80_add(fp1, float64_to_floatx80( in floatx80_lognp1()
400 fp1 = floatx80_add(fp1, fp2, in floatx80_lognp1()
402 fp0 = floatx80_mul(fp0, fp1, in floatx80_lognp1()
432 floatx80 fp0, fp1, fp2, fp3, f, logof2, klog2, saveu; in floatx80_logn() local
478 fp1 = int32_to_floatx80(k, status); in floatx80_logn()
491 klog2 = floatx80_mul(fp1, logof2, status); /* FP1 IS K*LOG2 */ in floatx80_logn()
495 fp1 = fp2; in floatx80_logn()
497 fp1 = floatx80_mul(fp1, float64_to_floatx80( in floatx80_logn()
503 fp1 = floatx80_add(fp1, float64_to_floatx80( in floatx80_logn()
509 fp1 = floatx80_mul(fp1, fp3, status); /* V*(A4+V*A6) */ in floatx80_logn()
511 fp1 = floatx80_add(fp1, float64_to_floatx80( in floatx80_logn()
517 fp1 = floatx80_mul(fp1, fp3, status); /* V*(A2+V*(A4+V*A6)) */ in floatx80_logn()
519 fp1 = floatx80_mul(fp1, fp0, status); /* U*V*(A2+V*(A4+V*A6)) */ in floatx80_logn()
522 fp1 = floatx80_add(fp1, log_tbl[j + 1], in floatx80_logn()
524 fp0 = floatx80_add(fp0, fp1, status); /* FP0 IS LOG(F) + LOG(1+U) */ in floatx80_logn()
536 fp1 = a; in floatx80_logn()
537 fp1 = floatx80_sub(fp1, float32_to_floatx80(make_float32(0x3F800000), in floatx80_logn()
541 fp1 = floatx80_add(fp1, fp1, status); /* FP1 IS 2(X-1) */ in floatx80_logn()
544 fp1 = floatx80_div(fp1, fp0, status); /* U */ in floatx80_logn()
545 saveu = fp1; in floatx80_logn()
546 fp0 = floatx80_mul(fp1, fp1, status); /* FP0 IS V = U*U */ in floatx80_logn()
547 fp1 = floatx80_mul(fp0, fp0, status); /* FP1 IS W = V*V */ in floatx80_logn()
553 fp3 = floatx80_mul(fp3, fp1, status); /* W*B5 */ in floatx80_logn()
554 fp2 = floatx80_mul(fp2, fp1, status); /* W*B4 */ in floatx80_logn()
561 fp1 = floatx80_mul(fp1, fp3, status); /* W*(B3+W*B5) */ in floatx80_logn()
563 fp1 = floatx80_add(fp1, float64_to_floatx80( in floatx80_logn()
568 fp1 = floatx80_add(fp1, fp2, status); /* B1+W*(B3+W*B5) + V*(B2+W*B4) */ in floatx80_logn()
569 fp0 = floatx80_mul(fp0, fp1, in floatx80_logn()
598 floatx80 fp0, fp1; in floatx80_log10() local
629 fp1 = packFloatx80(0, 0x3FFD, UINT64_C(0xDE5BD8A937287195)); /* INV_L10 */ in floatx80_log10()
634 a = floatx80_mul(fp0, fp1, status); /* LOGN(X)*INV_L10 */ in floatx80_log10()
654 floatx80 fp0, fp1; in floatx80_log2() local
694 fp1 = packFloatx80(0, 0x3FFF, UINT64_C(0xB8AA3B295C17F0BC)); /* INV_L2 */ in floatx80_log2()
699 a = floatx80_mul(fp0, fp1, status); /* LOGN(X)*INV_L2 */ in floatx80_log2()
721 floatx80 fp0, fp1, fp2, fp3, l2, scale, adjscale; in floatx80_etox() local
754 fp1 = a; in floatx80_etox()
780 fp0 = floatx80_add(fp0, fp1, status); /* X + N*L1 */ in floatx80_etox()
783 fp1 = floatx80_mul(fp0, fp0, status); /* S = R*R */ in floatx80_etox()
786 fp2 = floatx80_mul(fp2, fp1, status); /* fp2 is S*A5 */ in floatx80_etox()
788 status), fp1, in floatx80_etox()
796 fp2 = floatx80_mul(fp2, fp1, status); /* fp2 is S*(A3+S*A5) */ in floatx80_etox()
797 fp3 = floatx80_mul(fp3, fp1, status); /* fp3 is S*(A2+S*A4) */ in floatx80_etox()
802 fp2 = floatx80_mul(fp2, fp1, in floatx80_etox()
807 fp1 = exp_tbl[j]; in floatx80_etox()
808 fp0 = floatx80_mul(fp0, fp1, status); /* 2^(J/64)*(Exp(R)-1) */ in floatx80_etox()
811 fp0 = floatx80_add(fp0, fp1, in floatx80_etox()
846 fp1 = a; in floatx80_etox()
905 floatx80 fp0, fp1, fp2, fp3, adjfact, fact1, fact2; in floatx80_twotox() local
960 fp1 = fp0; /* X */ in floatx80_twotox()
961 fp1 = floatx80_mul(fp1, float32_to_floatx80( in floatx80_twotox()
964 n = floatx80_to_int32(fp1, status); in floatx80_twotox()
965 fp1 = int32_to_floatx80(n, status); in floatx80_twotox()
994 fp1 = floatx80_mul(fp1, float32_to_floatx80( in floatx80_twotox()
997 fp0 = floatx80_sub(fp0, fp1, status); /* X - (1/64)*INT(64 X) */ in floatx80_twotox()
1002 fp1 = floatx80_mul(fp0, fp0, status); /* S = R*R */ in floatx80_twotox()
1007 fp2 = floatx80_mul(fp2, fp1, status); /* S*A5 */ in floatx80_twotox()
1008 fp3 = floatx80_mul(fp3, fp1, status); /* S*A4 */ in floatx80_twotox()
1015 fp2 = floatx80_mul(fp2, fp1, status); /* S*(A3+S*A5) */ in floatx80_twotox()
1016 fp3 = floatx80_mul(fp3, fp1, status); /* S*(A2+S*A4) */ in floatx80_twotox()
1022 fp2 = floatx80_mul(fp2, fp1, status); /* S*(A1+S*(A3+S*A5)) */ in floatx80_twotox()
1055 floatx80 fp0, fp1, fp2, fp3, adjfact, fact1, fact2; in floatx80_tentox() local
1110 fp1 = fp0; /* X */ in floatx80_tentox()
1111 fp1 = floatx80_mul(fp1, float64_to_floatx80( in floatx80_tentox()
1114 n = floatx80_to_int32(fp1, status); /* N=INT(X*64*LOG10/LOG2) */ in floatx80_tentox()
1115 fp1 = int32_to_floatx80(n, status); in floatx80_tentox()
1145 fp2 = fp1; /* N */ in floatx80_tentox()
1146 fp1 = floatx80_mul(fp1, float64_to_floatx80( in floatx80_tentox()
1151 fp0 = floatx80_sub(fp0, fp1, status); /* X - N L_LEAD */ in floatx80_tentox()
1157 fp1 = floatx80_mul(fp0, fp0, status); /* S = R*R */ in floatx80_tentox()
1162 fp2 = floatx80_mul(fp2, fp1, status); /* S*A5 */ in floatx80_tentox()
1163 fp3 = floatx80_mul(fp3, fp1, status); /* S*A4 */ in floatx80_tentox()
1170 fp2 = floatx80_mul(fp2, fp1, status); /* S*(A3+S*A5) */ in floatx80_tentox()
1171 fp3 = floatx80_mul(fp3, fp1, status); /* S*(A2+S*A4) */ in floatx80_tentox()
1177 fp2 = floatx80_mul(fp2, fp1, status); /* S*(A1+S*(A3+S*A5)) */ in floatx80_tentox()
1210 floatx80 fp0, fp1, fp2, fp3, fp4, fp5, invtwopi, twopi1, twopi2; in floatx80_tan() local
1243 fp1 = packFloatx80(0, 0, 0); in floatx80_tan()
1250 fp1 = fp0; in floatx80_tan()
1252 fp1 = floatx80_sub(fp1, fp0, status); in floatx80_tan()
1253 fp1 = floatx80_add(fp1, twopi2, status); in floatx80_tan()
1286 fp1 = floatx80_sub(fp1, fp4, status); /* FP1 is a := r - p */ in floatx80_tan()
1287 fp0 = floatx80_add(fp0, fp1, status); /* FP0 is R := A+a */ in floatx80_tan()
1294 fp1 = floatx80_add(fp1, fp3, status); /* FP1 is r := (A-R)+a */ in floatx80_tan()
1307 fp1 = floatx80_mul(fp0, float64_to_floatx80( in floatx80_tan()
1311 n = floatx80_to_int32(fp1, status); in floatx80_tan()
1321 fp1 = fp0; /* R */ in floatx80_tan()
1344 fp2 = floatx80_mul(fp2, fp1, status); /* RS(P1+S(P2+SP3)) */ in floatx80_tan()
1346 fp1 = floatx80_add(fp1, fp2, status); /* R+RS(P1+S(P2+SP3)) */ in floatx80_tan()
1351 xSign = extractFloatx80Sign(fp1); in floatx80_tan()
1352 xExp = extractFloatx80Exp(fp1); in floatx80_tan()
1353 xSig = extractFloatx80Frac(fp1); in floatx80_tan()
1355 fp1 = packFloatx80(xSign, xExp, xSig); in floatx80_tan()
1360 a = floatx80_div(fp0, fp1, status); in floatx80_tan()
1366 fp1 = floatx80_mul(fp0, fp0, status); /* S = R*R */ in floatx80_tan()
1371 fp3 = floatx80_mul(fp3, fp1, status); /* SQ4 */ in floatx80_tan()
1372 fp2 = floatx80_mul(fp2, fp1, status); /* SP3 */ in floatx80_tan()
1378 fp3 = floatx80_mul(fp3, fp1, status); /* S(Q3+SQ4) */ in floatx80_tan()
1379 fp2 = floatx80_mul(fp2, fp1, status); /* S(P2+SP3) */ in floatx80_tan()
1384 fp3 = floatx80_mul(fp3, fp1, status); /* S(Q2+S(Q3+SQ4)) */ in floatx80_tan()
1385 fp2 = floatx80_mul(fp2, fp1, status); /* S(P1+S(P2+SP3)) */ in floatx80_tan()
1389 fp1 = floatx80_mul(fp1, fp3, status); /* S(Q1+S(Q2+S(Q3+SQ4))) */ in floatx80_tan()
1391 fp1 = floatx80_add(fp1, float32_to_floatx80( in floatx80_tan()
1398 a = floatx80_div(fp0, fp1, status); in floatx80_tan()
1421 floatx80 fp0, fp1, fp2, fp3, fp4, fp5, x, invtwopi, twopi1, twopi2; in floatx80_sin() local
1454 fp1 = packFloatx80(0, 0, 0); in floatx80_sin()
1461 fp1 = fp0; in floatx80_sin()
1463 fp1 = floatx80_sub(fp1, fp0, status); in floatx80_sin()
1464 fp1 = floatx80_add(fp1, twopi2, status); in floatx80_sin()
1497 fp1 = floatx80_sub(fp1, fp4, status); /* FP1 is a := r - p */ in floatx80_sin()
1498 fp0 = floatx80_add(fp0, fp1, status); /* FP0 is R := A+a */ in floatx80_sin()
1505 fp1 = floatx80_add(fp1, fp3, status); /* FP1 is r := (A-R)+a */ in floatx80_sin()
1522 fp1 = floatx80_mul(fp0, float64_to_floatx80( in floatx80_sin()
1526 n = floatx80_to_int32(fp1, status); in floatx80_sin()
1537 fp1 = floatx80_mul(fp0, fp0, status); /* FP1 IS T */ in floatx80_sin()
1555 fp2 = floatx80_mul(fp2, fp1, status); /* TB8 */ in floatx80_sin()
1556 fp3 = floatx80_mul(fp3, fp1, status); /* TB7 */ in floatx80_sin()
1563 fp2 = floatx80_mul(fp2, fp1, status); /* T(B6+TB8) */ in floatx80_sin()
1564 fp3 = floatx80_mul(fp3, fp1, status); /* T(B5+TB7) */ in floatx80_sin()
1570 fp2 = floatx80_mul(fp2, fp1, status); /* T(B4+T(B6+TB8)) */ in floatx80_sin()
1571 fp1 = floatx80_mul(fp1, fp3, status); /* T(B3+T(B5+TB7)) */ in floatx80_sin()
1574 fp1 = floatx80_add(fp1, float32_to_floatx80( in floatx80_sin()
1578 fp0 = floatx80_add(fp0, fp1, status); /* [B1+T(B3+T(B5+TB7))]+ in floatx80_sin()
1602 fp1 = floatx80_mul(fp0, fp0, status); /* FP1 IS T */ in floatx80_sin()
1607 fp3 = floatx80_mul(fp3, fp1, status); /* T*A7 */ in floatx80_sin()
1608 fp2 = floatx80_mul(fp2, fp1, status); /* T*A6 */ in floatx80_sin()
1615 fp3 = floatx80_mul(fp3, fp1, status); /* T(A5+TA7) */ in floatx80_sin()
1616 fp2 = floatx80_mul(fp2, fp1, status); /* T(A4+TA6) */ in floatx80_sin()
1622 fp1 = floatx80_mul(fp1, fp3, status); /* T(A3+T(A5+TA7)) */ in floatx80_sin()
1625 fp1 = floatx80_add(fp1, fp4, status); /* A1+T(A3+T(A5+TA7)) */ in floatx80_sin()
1626 fp1 = floatx80_add(fp1, fp2, in floatx80_sin()
1633 fp0 = floatx80_mul(fp0, fp1, status); /* SIN(R')-R' */ in floatx80_sin()
1661 floatx80 fp0, fp1, fp2, fp3, fp4, fp5, x, invtwopi, twopi1, twopi2; in floatx80_cos() local
1694 fp1 = packFloatx80(0, 0, 0); in floatx80_cos()
1701 fp1 = fp0; in floatx80_cos()
1703 fp1 = floatx80_sub(fp1, fp0, status); in floatx80_cos()
1704 fp1 = floatx80_add(fp1, twopi2, status); in floatx80_cos()
1737 fp1 = floatx80_sub(fp1, fp4, status); /* FP1 is a := r - p */ in floatx80_cos()
1738 fp0 = floatx80_add(fp0, fp1, status); /* FP0 is R := A+a */ in floatx80_cos()
1745 fp1 = floatx80_add(fp1, fp3, status); /* FP1 is r := (A-R)+a */ in floatx80_cos()
1763 fp1 = floatx80_mul(fp0, float64_to_floatx80( in floatx80_cos()
1767 n = floatx80_to_int32(fp1, status); in floatx80_cos()
1778 fp1 = floatx80_mul(fp0, fp0, status); /* FP1 IS T */ in floatx80_cos()
1796 fp2 = floatx80_mul(fp2, fp1, status); /* TB8 */ in floatx80_cos()
1797 fp3 = floatx80_mul(fp3, fp1, status); /* TB7 */ in floatx80_cos()
1804 fp2 = floatx80_mul(fp2, fp1, status); /* T(B6+TB8) */ in floatx80_cos()
1805 fp3 = floatx80_mul(fp3, fp1, status); /* T(B5+TB7) */ in floatx80_cos()
1811 fp2 = floatx80_mul(fp2, fp1, status); /* T(B4+T(B6+TB8)) */ in floatx80_cos()
1812 fp1 = floatx80_mul(fp1, fp3, status); /* T(B3+T(B5+TB7)) */ in floatx80_cos()
1815 fp1 = floatx80_add(fp1, float32_to_floatx80( in floatx80_cos()
1819 fp0 = floatx80_add(fp0, fp1, status); in floatx80_cos()
1842 fp1 = floatx80_mul(fp0, fp0, status); /* FP1 IS T */ in floatx80_cos()
1847 fp3 = floatx80_mul(fp3, fp1, status); /* T*A7 */ in floatx80_cos()
1848 fp2 = floatx80_mul(fp2, fp1, status); /* T*A6 */ in floatx80_cos()
1855 fp3 = floatx80_mul(fp3, fp1, status); /* T(A5+TA7) */ in floatx80_cos()
1856 fp2 = floatx80_mul(fp2, fp1, status); /* T(A4+TA6) */ in floatx80_cos()
1862 fp1 = floatx80_mul(fp1, fp3, status); /* T(A3+T(A5+TA7)) */ in floatx80_cos()
1865 fp1 = floatx80_add(fp1, fp4, status); /* A1+T(A3+T(A5+TA7)) */ in floatx80_cos()
1866 fp1 = floatx80_add(fp1, fp2, status); in floatx80_cos()
1871 fp0 = floatx80_mul(fp0, fp1, status); /* SIN(R')-R' */ in floatx80_cos()
1899 floatx80 fp0, fp1, fp2, fp3, xsave; in floatx80_atan() local
1930 fp1 = packFloatx80(aSign, 0x0001, one_sig); in floatx80_atan()
1935 a = floatx80_sub(fp0, fp1, status); in floatx80_atan()
1942 fp1 = packFloatx80(1, one_exp, one_sig); /* -1 */ in floatx80_atan()
1943 fp1 = floatx80_div(fp1, fp0, status); /* X' = -1/X */ in floatx80_atan()
1944 xsave = fp1; in floatx80_atan()
1945 fp0 = floatx80_mul(fp1, fp1, status); /* Y = X'*X' */ in floatx80_atan()
1946 fp1 = floatx80_mul(fp0, fp0, status); /* Z = Y*Y */ in floatx80_atan()
1951 fp3 = floatx80_mul(fp3, fp1, status); /* Z*C5 */ in floatx80_atan()
1952 fp2 = floatx80_mul(fp2, fp1, status); /* Z*C4 */ in floatx80_atan()
1959 fp1 = floatx80_mul(fp1, fp3, status); /* Z*(C3+Z*C5) */ in floatx80_atan()
1961 fp1 = floatx80_add(fp1, float64_to_floatx80( in floatx80_atan()
1966 fp1 = floatx80_add(fp1, fp2, status); in floatx80_atan()
1968 fp0 = floatx80_mul(fp0, fp1, status); in floatx80_atan()
1970 fp1 = packFloatx80(aSign, piby2_exp, pi_sig); in floatx80_atan()
1975 a = floatx80_add(fp0, fp1, status); in floatx80_atan()
1995 fp1 = floatx80_mul(fp0, fp0, status); /* Z = Y*Y */ in floatx80_atan()
2000 fp2 = floatx80_mul(fp2, fp1, status); /* Z*B6 */ in floatx80_atan()
2001 fp3 = floatx80_mul(fp3, fp1, status); /* Z*B5 */ in floatx80_atan()
2008 fp2 = floatx80_mul(fp2, fp1, status); /* Z*(B4+Z*B6) */ in floatx80_atan()
2009 fp1 = floatx80_mul(fp1, fp3, status); /* Z*(B3+Z*B5) */ in floatx80_atan()
2013 fp1 = floatx80_add(fp1, float64_to_floatx80( in floatx80_atan()
2019 fp1 = floatx80_add(fp1, fp2, status); in floatx80_atan()
2021 fp0 = floatx80_mul(fp0, fp1, status); in floatx80_atan()
2038 fp1 = a; /* X */ in floatx80_atan()
2040 fp1 = floatx80_mul(fp1, xsave, status); /* X*F */ in floatx80_atan()
2042 fp1 = floatx80_add(fp1, fp2, status); /* 1 + X*F */ in floatx80_atan()
2043 fp0 = floatx80_div(fp0, fp1, status); /* U = (X-F)/(1+X*F) */ in floatx80_atan()
2057 fp1 = floatx80_mul(fp0, fp0, status); /* V = U*U */ in floatx80_atan()
2060 fp2 = floatx80_add(fp2, fp1, status); /* A3+V */ in floatx80_atan()
2061 fp2 = floatx80_mul(fp2, fp1, status); /* V*(A3+V) */ in floatx80_atan()
2062 fp1 = floatx80_mul(fp1, fp0, status); /* U*V */ in floatx80_atan()
2066 fp1 = floatx80_mul(fp1, float64_to_floatx80( in floatx80_atan()
2069 fp1 = floatx80_mul(fp1, fp2, status); /* A1*U*V*(A2+V*(A3+V)) */ in floatx80_atan()
2070 fp0 = floatx80_add(fp0, fp1, status); /* ATAN(U) */ in floatx80_atan()
2097 floatx80 fp0, fp1, fp2, one; in floatx80_asin() local
2133 fp1 = floatx80_sub(one, fp0, status); /* 1 - X */ in floatx80_asin()
2135 fp1 = floatx80_mul(fp2, fp1, status); /* (1+X)*(1-X) */ in floatx80_asin()
2136 fp1 = floatx80_sqrt(fp1, status); /* SQRT((1+X)*(1-X)) */ in floatx80_asin()
2137 fp0 = floatx80_div(fp0, fp1, status); /* X/SQRT((1+X)*(1-X)) */ in floatx80_asin()
2163 floatx80 fp0, fp1, one; in floatx80_acos() local
2203 fp1 = floatx80_add(one, fp0, status); /* 1 + X */ in floatx80_acos()
2205 fp0 = floatx80_div(fp0, fp1, status); /* (1-X)/(1+X) */ in floatx80_acos()
2233 floatx80 fp0, fp1, fp2, one; in floatx80_atanh() local
2267 fp1 = packFloatx80(1, aExp, aSig); /* -Y */ in floatx80_atanh()
2269 fp1 = floatx80_add(fp1, one, status); /* 1-Y */ in floatx80_atanh()
2270 fp0 = floatx80_div(fp0, fp1, status); /* Z = 2Y/(1-Y) */ in floatx80_atanh()
2298 floatx80 fp0, fp1, fp2, fp3, l2, sc, onebysc; in floatx80_etoxm1() local
2328 fp1 = a; in floatx80_etoxm1()
2354 fp0 = floatx80_add(fp0, fp1, status); /* X + N*L1 */ in floatx80_etoxm1()
2357 fp1 = floatx80_mul(fp0, fp0, status); /* S = R*R */ in floatx80_etoxm1()
2360 fp2 = floatx80_mul(fp2, fp1, status); /* fp2 is S*A6 */ in floatx80_etoxm1()
2362 status), fp1, status); /* fp3 is S*A5 */ in floatx80_etoxm1()
2369 fp2 = floatx80_mul(fp2, fp1, status); /* fp2 IS S*(A4+S*A6) */ in floatx80_etoxm1()
2370 fp3 = floatx80_mul(fp3, fp1, status); /* fp3 IS S*(A3+S*A5) */ in floatx80_etoxm1()
2377 fp2 = floatx80_mul(fp2, fp1, in floatx80_etoxm1()
2379 fp1 = floatx80_mul(fp1, fp3, in floatx80_etoxm1()
2383 fp0 = floatx80_add(fp0, fp1, in floatx80_etoxm1()
2391 fp1 = float32_to_floatx80(exp_tbl2[j], status); in floatx80_etoxm1()
2393 fp1 = floatx80_add(fp1, onebysc, status); in floatx80_etoxm1()
2394 fp0 = floatx80_add(fp0, fp1, status); in floatx80_etoxm1()
2403 fp1 = exp_tbl[j]; in floatx80_etoxm1()
2407 fp1 = floatx80_add(fp1, onebysc, status); in floatx80_etoxm1()
2408 fp0 = floatx80_add(fp0, fp1, status); in floatx80_etoxm1()
2447 fp1 = float32_to_floatx80(make_float32(0x2F30CAA8), in floatx80_etoxm1()
2449 fp1 = floatx80_mul(fp1, fp0, status); /* S * B12 */ in floatx80_etoxm1()
2452 fp1 = floatx80_add(fp1, float32_to_floatx80( in floatx80_etoxm1()
2456 fp1 = floatx80_mul(fp1, fp0, status); in floatx80_etoxm1()
2460 fp1 = floatx80_add(fp1, float64_to_floatx80( in floatx80_etoxm1()
2464 fp1 = floatx80_mul(fp1, fp0, status); in floatx80_etoxm1()
2468 fp1 = floatx80_add(fp1, float64_to_floatx80( in floatx80_etoxm1()
2472 fp1 = floatx80_mul(fp1, fp0, status); in floatx80_etoxm1()
2476 fp1 = floatx80_add(fp1, float64_to_floatx80( in floatx80_etoxm1()
2480 fp1 = floatx80_mul(fp1, fp0, status); in floatx80_etoxm1()
2485 fp1 = floatx80_add(fp1, fp3, status); /* B2 */ in floatx80_etoxm1()
2487 fp1 = floatx80_mul(fp1, fp0, status); in floatx80_etoxm1()
2490 fp1 = floatx80_mul(fp1, a, status); in floatx80_etoxm1()
2495 fp1 = floatx80_add(fp1, fp2, status); /* Q */ in floatx80_etoxm1()
2496 fp0 = floatx80_add(fp0, fp1, status); /* S*B1+Q */ in floatx80_etoxm1()
2550 floatx80 fp0, fp1; in floatx80_tanh() local
2612 fp1 = floatx80_div(float32_to_floatx80(make_float32( in floatx80_tanh()
2621 a = floatx80_add(fp1, fp0, status); in floatx80_tanh()
2631 fp1 = floatx80_add(fp0, float32_to_floatx80(make_float32(0x40000000), in floatx80_tanh()
2635 vSign = extractFloatx80Sign(fp1); in floatx80_tanh()
2636 vExp = extractFloatx80Exp(fp1); in floatx80_tanh()
2637 vSig = extractFloatx80Frac(fp1); in floatx80_tanh()
2639 fp1 = packFloatx80(vSign ^ aSign, vExp, vSig); in floatx80_tanh()
2644 a = floatx80_div(fp0, fp1, status); in floatx80_tanh()
2666 floatx80 fp0, fp1, fp2; in floatx80_sinh() local
2722 fp1 = floatx80_add(fp0, float32_to_floatx80(make_float32(0x3F800000), in floatx80_sinh()
2725 fp0 = floatx80_div(fp0, fp1, status); /* Z/(1+Z) */ in floatx80_sinh()
2754 floatx80 fp0, fp1; in floatx80_cosh() local
2792 fp1 = packFloatx80(0, 0x7FFB, one_sig); in floatx80_cosh()
2797 a = floatx80_mul(fp0, fp1, status); in floatx80_cosh()
2809 fp1 = float32_to_floatx80(make_float32(0x3E800000), status); /* 1/4 */ in floatx80_cosh()
2810 fp1 = floatx80_div(fp1, fp0, status); /* 1/(2*EXP(|X|)) */ in floatx80_cosh()
2815 a = floatx80_add(fp0, fp1, status); in floatx80_cosh()