arb/arb_hypgeom/sum_fmpq_imag_arb.c

22 lines
790 B
C

/*
Copyright (C) 2021 Fredrik Johansson
This file is part of Arb.
Arb is free software: you can redistribute it and/or modify it under
the terms of the GNU Lesser General Public License (LGPL) as published
by the Free Software Foundation; either version 2.1 of the License, or
(at your option) any later version. See <http://www.gnu.org/licenses/>.
*/
#include "arb_hypgeom.h"
void
arb_hypgeom_sum_fmpq_imag_arb(arb_t res1, arb_t res2, const fmpq * a, slong alen, const fmpq * b, slong blen, const arb_t z, slong N, slong prec)
{
if (N <= 10 || (prec <= 1024 && N <= 16))
arb_hypgeom_sum_fmpq_imag_arb_forward(res1, res2, a, alen, b, blen, z, N, prec);
else
arb_hypgeom_sum_fmpq_imag_arb_rs(res1, res2, a, alen, b, blen, z, N, prec);
}