Lines Matching +full:p2u +full:- +full:3
1 /*-
2 * SPDX-License-Identifier: BSD-3-Clause
15 * 3. Neither the name of the University nor the names of its contributors
42 p0u = LD80C(0xaaaaaaaaaaaaaaab, -3, 1.66666666666666666671e-01L),
43 p1u = LD80C(0xb60b60b60b60b59a, -9, -2.77777777777777775377e-03L),
44 p2u = LD80C(0x8ab355e008a3cfce, -14, 6.61375661375629297465e-05L), variable
45 p3u = LD80C(0xddebbc994b0c1376, -20, -1.65343915327882529784e-06L),
46 p4u = LD80C(0xb354784cb4ef4c41, -25, 4.17535101591534118469e-08L),
47 p5u = LD80C(0x913e8a718382ce75, -30, -1.05679137034774806475e-09L),
48 p6u = LD80C(0xe8f0042aa134502e, -36, 2.64819349895429516863e-11L);
51 #define p3 (p2u.e)
59 * lntiny = (LDBL_MIN_EXP - 64 - 10) * log(2.)
63 ln2hiu = LD80C(0xb17217f700000000, -1, 6.93147180369123816490e-01L),
64 ln2lou = LD80C(0xd1cf79abc9e3b398, -33, 1.90821492927058781614e-10L),
66 lntinyu = LD80C(0xb236f28a68bc3bd7, 13, -1.14057368561139000667e+04L),
87 /* argument reduction: x --> x - k*ln2 */ in __exp__D()
92 * Express (x + c) - k * ln2 as hi - lo. in __exp__D()
93 * Let x = hi - lo rounded. in __exp__D()
95 hi = x - k * ln2hi; /* Exact. */ in __exp__D()
96 lo = k * ln2lo - c; in __exp__D()
97 x = hi - lo; in __exp__D()
101 c = x - z * (p1 + z * (p2 + z * (p3 + z * (p4 + in __exp__D()
103 c = (x * c) / (2 - c); in __exp__D()
105 return (ldexpl(1 + (hi - (lo - c)), k)); in __exp__D()
107 /* exp(-INF) is 0. exp(-big) underflows to 0. */ in __exp__D()
108 return (isfinite(x) ? ldexpl(1., -5000) : 0); in __exp__D()