projects
/
musl
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Merge branch 'master' of git://git.etalabs.net/musl
[musl]
/
src
/
math
/
__cosl.c
diff --git
a/src/math/__cosl.c
b/src/math/__cosl.c
index
80036dd
..
9d32576
100644
(file)
--- a/
src/math/__cosl.c
+++ b/
src/math/__cosl.c
@@
-41,8
+41,6
@@
* almost for free from the complications needed to search for the best
* higher coefficients.
*/
* almost for free from the complications needed to search for the best
* higher coefficients.
*/
-static const double one = 1.0;
-
static const long double
C1 = 0.0416666666666666666136L; /* 0xaaaaaaaaaaaaaa9b.0p-68 */
static const long double
C1 = 0.0416666666666666666136L; /* 0xaaaaaaaaaaaaaa9b.0p-68 */
@@
-61,7
+59,7
@@
long double __cosl(long double x, long double y)
z = x*x;
r = z*(C1+z*(C2+z*(C3+z*(C4+z*(C5+z*(C6+z*C7))))));
hz = 0.5*z;
z = x*x;
r = z*(C1+z*(C2+z*(C3+z*(C4+z*(C5+z*(C6+z*C7))))));
hz = 0.5*z;
- w =
one
-hz;
- return w + (((
one
-w)-hz) + (z*r-x*y));
+ w =
1.0
-hz;
+ return w + (((
1.0
-w)-hz) + (z*r-x*y));
}
#endif
}
#endif