mirror of
https://sourceware.org/git/glibc.git
synced 2025-07-29 11:41:21 +03:00
Fix inaccuracy of clog, clog10 near |z| = 1 (bug 13629).
This commit is contained in:
@ -89,6 +89,19 @@ __clog10l (__complex__ long double x)
|
||||
d2m1 += absy * absy;
|
||||
__real__ result = __log1pl (d2m1) * (M_LOG10El / 2.0L);
|
||||
}
|
||||
else if (absx < 1.0L
|
||||
&& absx >= 0.75L
|
||||
&& absy < LDBL_EPSILON / 2.0L
|
||||
&& scale == 0)
|
||||
{
|
||||
long double d2m1 = (absx - 1.0L) * (absx + 1.0L);
|
||||
__real__ result = __log1pl (d2m1) * (M_LOG10El / 2.0L);
|
||||
}
|
||||
else if (absx < 1.0L && (absx >= 0.75L || absy >= 0.5L) && scale == 0)
|
||||
{
|
||||
long double d2m1 = __x2y2m1l (absx, absy);
|
||||
__real__ result = __log1pl (d2m1) * (M_LOG10El / 2.0L);
|
||||
}
|
||||
else
|
||||
{
|
||||
long double d = __ieee754_hypotl (absx, absy);
|
||||
|
Reference in New Issue
Block a user