Date: Mon, 3 Jun 2013 18:18:09 +0000 (UTC) From: Steve Kargl <kargl@FreeBSD.org> To: src-committers@freebsd.org, svn-src-all@freebsd.org, svn-src-head@freebsd.org Subject: svn commit: r251333 - head/lib/msun/ld80 Message-ID: <201306031818.r53II9pp009295@svn.freebsd.org>
next in thread | raw e-mail | index | archive | help
Author: kargl Date: Mon Jun 3 18:18:08 2013 New Revision: 251333 URL: http://svnweb.freebsd.org/changeset/base/251333 Log: Rename a few P2, P3, ... coefficients to A2, A3, ... missed in my previous commit. Modified: head/lib/msun/ld80/s_expl.c Modified: head/lib/msun/ld80/s_expl.c ============================================================================== --- head/lib/msun/ld80/s_expl.c Mon Jun 3 18:17:47 2013 (r251332) +++ head/lib/msun/ld80/s_expl.c Mon Jun 3 18:18:08 2013 (r251333) @@ -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;
Want to link to this message? Use this URL: <https://mail-archive.FreeBSD.org/cgi/mid.cgi?201306031818.r53II9pp009295>