mirror of
https://github.com/vale981/arb
synced 2025-03-06 01:41:39 -05:00
arb_asinh: use more accurate formula for x < 0
This commit is contained in:
parent
f1475df2a3
commit
6faf488f7b
1 changed files with 12 additions and 2 deletions
14
arb/asinh.c
14
arb/asinh.c
|
@ -39,8 +39,18 @@ arb_asinh(arb_t z, const arb_t x, slong prec)
|
|||
|
||||
arb_mul(t, x, x, prec + 4);
|
||||
arb_sqrt1pm1(t, t, prec + 4);
|
||||
arb_add(t, t, x, prec + 4);
|
||||
arb_log1p(z, t, prec);
|
||||
|
||||
if (arf_sgn(arb_midref(x)) >= 0)
|
||||
{
|
||||
arb_add(t, t, x, prec + 4);
|
||||
arb_log1p(z, t, prec);
|
||||
}
|
||||
else
|
||||
{
|
||||
arb_sub(t, t, x, prec + 4);
|
||||
arb_log1p(z, t, prec);
|
||||
arb_neg(z, z);
|
||||
}
|
||||
|
||||
arb_clear(t);
|
||||
}
|
||||
|
|
Loading…
Add table
Reference in a new issue