gamma fine-tuning

This commit is contained in:
fredrik 2021-09-02 12:53:03 +02:00
parent 97f2325896
commit 7eaf81d4b9
2 changed files with 2 additions and 2 deletions

View file

@ -41,7 +41,7 @@ acb_hypgeom_gamma_stirling_inner(acb_t s, const acb_t z, slong N, slong prec)
arb_add(acb_realref(t), acb_realref(t), acb_realref(logz), prec);
/* sum part */
if (prec <= 384)
if (prec <= 128 || (prec <= 1024 && N <= 40) || (prec <= 2048 && N <= 16))
acb_hypgeom_gamma_stirling_sum_horner(s, z, N, prec);
else
acb_hypgeom_gamma_stirling_sum_improved(s, z, N, 0, prec);

View file

@ -231,7 +231,7 @@ arb_hypgeom_gamma_stirling_inner(arb_t s, const arb_t z, slong N, slong prec)
arb_add(t, t, logz, prec);
/* sum part */
if (prec <= 256)
if (prec <= 128 || (prec <= 768 && N <= 40) || (prec <= 2048 && N <= 16))
arb_hypgeom_gamma_stirling_sum_horner(s, z, N, prec);
else
arb_hypgeom_gamma_stirling_sum_improved(s, z, N, 0, prec);