projects
/
gnulib.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
Tests for module 'unicase/u16-is-uppercase'.
[gnulib.git]
/
lib
/
trigl.c
diff --git
a/lib/trigl.c
b/lib/trigl.c
index
ecdce32
..
6f9dcf5
100644
(file)
--- a/
lib/trigl.c
+++ b/
lib/trigl.c
@@
-205,7
+205,7
@@
ieee754_rem_pio2l (long double x, long double *y)
int exp, n;
if (x >= -0.78539816339744830961566084581987572104929234984377
int exp, n;
if (x >= -0.78539816339744830961566084581987572104929234984377
- && x < 0.78539816339744830961566084581987572104929234984377)
+ && x <
=
0.78539816339744830961566084581987572104929234984377)
/* x in <-pi/4, pi/4> */
{
y[0] = x;
/* x in <-pi/4, pi/4> */
{
y[0] = x;
@@
-213,9
+213,7
@@
ieee754_rem_pio2l (long double x, long double *y)
return 0;
}
return 0;
}
- if (x >= 2.35619449019234492884698253745962716314787704953131
- && x < 2.35619449019234492884698253745962716314787704953131)
- if (x > 0)
+ if (x > 0 && x < 2.35619449019234492884698253745962716314787704953131)
{
/* 113 + 93 bit PI is ok */
z = x - PI_2_1;
{
/* 113 + 93 bit PI is ok */
z = x - PI_2_1;
@@
-223,7
+221,8
@@
ieee754_rem_pio2l (long double x, long double *y)
y[1] = (z - y[0]) - PI_2_1t;
return 1;
}
y[1] = (z - y[0]) - PI_2_1t;
return 1;
}
- else
+
+ if (x < 0 && x > -2.35619449019234492884698253745962716314787704953131)
{
/* 113 + 93 bit PI is ok */
z = x + PI_2_1;
{
/* 113 + 93 bit PI is ok */
z = x + PI_2_1;