hiro/arb
1
0
Fork 0
mirror of https://github.com/vale981/arb synced 2025-03-05 09:21:38 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

fix a few potential bugs

Browse source
This commit is contained in:
fredrik 2022-01-20 20:28:46 +01:00
parent c2b7e36915
commit 5b5b2a6dc8
5 changed files with 7 additions and 0 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

1
arb_hypgeom/ci.c
View file

@ -9,6 +9,7 @@
(at your option) any later version. See <http://www.gnu.org/licenses/>.
*/
#include "flint/double_extras.h"
#include "arb_hypgeom.h"
#define LOG2 0.69314718055994531

1
arb_hypgeom/erf.c
View file

@ -9,6 +9,7 @@
(at your option) any later version. See <http://www.gnu.org/licenses/>.
*/
#include "flint/double_extras.h"
#include "arb_hypgeom.h"
#define LOG2 0.69314718055994530942

1
arb_hypgeom/gamma_fmpq.c
View file

@ -9,6 +9,7 @@
(at your option) any later version. See <http://www.gnu.org/licenses/>.
*/
#include "flint/double_extras.h"
#include "arb_hypgeom.h"
#include "hypgeom.h"

3
arb_hypgeom/gamma_upper_fmpq_step_bsplit.c
View file

@ -46,6 +46,9 @@ mag_geom_choose_N(const mag_t M, const mag_t C, const mag_t tol)
mag_t t, u;
slong N;
if (mag_is_finite(M) && mag_is_zero(C))
return 1;
/* N = log(M / ((1 - C) tol)) / log(1/C) */
mag_init(t);
mag_init(u);

1
arb_hypgeom/si.c
View file

@ -9,6 +9,7 @@
(at your option) any later version. See <http://www.gnu.org/licenses/>.
*/
#include "flint/double_extras.h"
#include "arb_hypgeom.h"
#define LOG2 0.69314718055994531