diff options
author | kargl <kargl@FreeBSD.org> | 2013-06-03 18:18:08 +0000 |
---|---|---|
committer | kargl <kargl@FreeBSD.org> | 2013-06-03 18:18:08 +0000 |
commit | 5f8df0bcf91a064c335ba9c37f58c0073b07ede6 (patch) | |
tree | 83d2a1a27422f779135482620e971b567a13856b /lib/msun/ld80 | |
parent | 10110ce9c502a029c3dd24fb6c06f59e9708d343 (diff) | |
download | FreeBSD-src-5f8df0bcf91a064c335ba9c37f58c0073b07ede6.zip FreeBSD-src-5f8df0bcf91a064c335ba9c37f58c0073b07ede6.tar.gz |
Rename a few P2, P3, ... coefficients to A2, A3, ... missed in
my previous commit.
Diffstat (limited to 'lib/msun/ld80')
-rw-r--r-- | lib/msun/ld80/s_expl.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lib/msun/ld80/s_expl.c b/lib/msun/ld80/s_expl.c index d53319f..5b07276 100644 --- a/lib/msun/ld80/s_expl.c +++ b/lib/msun/ld80/s_expl.c @@ -290,10 +290,10 @@ expl(long double x) /* Evaluate expl(midpoint[n2] + r1 + r2) = tbl[n2] * expl(r1 + r2). */ /* Here q = q(r), not q(r1), since r1 is lopped like L1. */ - t45 = r * P5 + P4; + t45 = r * A5 + A4; z = r * r; - t23 = r * P3 + P2; - q = r2 + z * t23 + z * z * t45 + z * z * z * P6; + t23 = r * A3 + A2; + q = r2 + z * t23 + z * z * t45 + z * z * z * A6; t = (long double)tbl[n2].lo + tbl[n2].hi; t = tbl[n2].lo + t * (q + r1) + tbl[n2].hi; |