Replace abort with flint_abort.

This will allow us to not loose the julia session on error.
See also https://github.com/wbhart/flint2/pull/243
This commit is contained in:
Tommy Hofmann 2017-02-28 16:50:03 +01:00
parent 609895124c
commit 6bf072eb59
826 changed files with 1720 additions and 1720 deletions

View file

@ -47,7 +47,7 @@ int main()
flint_printf("x = "); acb_printd(x, 15); flint_printf("\n\n");
flint_printf("a = "); acb_printd(a, 15); flint_printf("\n\n");
flint_printf("b = "); acb_printd(b, 15); flint_printf("\n\n");
abort();
flint_abort();
}
/* check cos(acos(x)) = x */
@ -58,7 +58,7 @@ int main()
flint_printf("FAIL: functional equation\n\n");
flint_printf("x = "); acb_printd(x, 15); flint_printf("\n\n");
flint_printf("b = "); acb_printd(b, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_acos(x, x, prec1);
@ -68,7 +68,7 @@ int main()
flint_printf("FAIL: aliasing\n\n");
flint_printf("a = "); acb_printd(a, 15); flint_printf("\n\n");
flint_printf("x = "); acb_printd(x, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(x);

View file

@ -47,7 +47,7 @@ int main()
flint_printf("x = "); acb_printd(x, 15); flint_printf("\n\n");
flint_printf("a = "); acb_printd(a, 15); flint_printf("\n\n");
flint_printf("b = "); acb_printd(b, 15); flint_printf("\n\n");
abort();
flint_abort();
}
/* check cosh(acosh(x)) = x */
@ -58,7 +58,7 @@ int main()
flint_printf("FAIL: functional equation\n\n");
flint_printf("x = "); acb_printd(x, 15); flint_printf("\n\n");
flint_printf("b = "); acb_printd(b, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_acosh(x, x, prec1);
@ -68,7 +68,7 @@ int main()
flint_printf("FAIL: aliasing\n\n");
flint_printf("a = "); acb_printd(a, 15); flint_printf("\n\n");
flint_printf("x = "); acb_printd(x, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(x);

View file

@ -107,7 +107,7 @@ int main()
flint_printf("z = "); acb_printd(z, 15); flint_printf("\n\n");
flint_printf("t = "); acb_printd(t, 15); flint_printf("\n\n");
flint_printf("w1 = "); acb_printd(w1 + j, 15); flint_printf("\n\n");
abort();
flint_abort();
}
}
}
@ -167,7 +167,7 @@ int main()
flint_printf("z2 = "); acb_printd(z2, 30); flint_printf("\n\n");
flint_printf("m1 = "); acb_printd(m1, 30); flint_printf("\n\n");
flint_printf("m2 = "); acb_printd(m2, 30); flint_printf("\n\n");
abort();
flint_abort();
}
}

View file

@ -47,7 +47,7 @@ int main()
flint_printf("x = "); acb_printd(x, 15); flint_printf("\n\n");
flint_printf("a = "); acb_printd(a, 15); flint_printf("\n\n");
flint_printf("b = "); acb_printd(b, 15); flint_printf("\n\n");
abort();
flint_abort();
}
/* check sin(asin(x)) = x */
@ -58,7 +58,7 @@ int main()
flint_printf("FAIL: functional equation\n\n");
flint_printf("x = "); acb_printd(x, 15); flint_printf("\n\n");
flint_printf("b = "); acb_printd(b, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_asin(x, x, prec1);
@ -68,7 +68,7 @@ int main()
flint_printf("FAIL: aliasing\n\n");
flint_printf("a = "); acb_printd(a, 15); flint_printf("\n\n");
flint_printf("x = "); acb_printd(x, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(x);

View file

@ -47,7 +47,7 @@ int main()
flint_printf("x = "); acb_printd(x, 15); flint_printf("\n\n");
flint_printf("a = "); acb_printd(a, 15); flint_printf("\n\n");
flint_printf("b = "); acb_printd(b, 15); flint_printf("\n\n");
abort();
flint_abort();
}
/* check sinh(asinh(x)) = x */
@ -58,7 +58,7 @@ int main()
flint_printf("FAIL: functional equation\n\n");
flint_printf("x = "); acb_printd(x, 15); flint_printf("\n\n");
flint_printf("b = "); acb_printd(b, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_asinh(x, x, prec1);
@ -68,7 +68,7 @@ int main()
flint_printf("FAIL: aliasing\n\n");
flint_printf("a = "); acb_printd(a, 15); flint_printf("\n\n");
flint_printf("x = "); acb_printd(x, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(x);

View file

@ -47,7 +47,7 @@ int main()
flint_printf("x = "); acb_printd(x, 15); flint_printf("\n\n");
flint_printf("a = "); acb_printd(a, 15); flint_printf("\n\n");
flint_printf("b = "); acb_printd(b, 15); flint_printf("\n\n");
abort();
flint_abort();
}
/* check tan(atan(x)) = x */
@ -58,7 +58,7 @@ int main()
flint_printf("FAIL: functional equation\n\n");
flint_printf("x = "); acb_printd(x, 15); flint_printf("\n\n");
flint_printf("b = "); acb_printd(b, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_atan(x, x, prec1);
@ -68,7 +68,7 @@ int main()
flint_printf("FAIL: aliasing\n\n");
flint_printf("a = "); acb_printd(a, 15); flint_printf("\n\n");
flint_printf("x = "); acb_printd(x, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(x);

View file

@ -47,7 +47,7 @@ int main()
flint_printf("x = "); acb_printd(x, 15); flint_printf("\n\n");
flint_printf("a = "); acb_printd(a, 15); flint_printf("\n\n");
flint_printf("b = "); acb_printd(b, 15); flint_printf("\n\n");
abort();
flint_abort();
}
/* check tanh(atanh(x)) = x */
@ -58,7 +58,7 @@ int main()
flint_printf("FAIL: functional equation\n\n");
flint_printf("x = "); acb_printd(x, 15); flint_printf("\n\n");
flint_printf("b = "); acb_printd(b, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_atanh(x, x, prec1);
@ -68,7 +68,7 @@ int main()
flint_printf("FAIL: aliasing\n\n");
flint_printf("a = "); acb_printd(a, 15); flint_printf("\n\n");
flint_printf("x = "); acb_printd(x, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(x);

View file

@ -54,7 +54,7 @@ int main()
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
acb_barnes_g(d, a, prec1);
@ -67,7 +67,7 @@ int main()
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
flint_printf("d = "); acb_print(d); flint_printf("\n\n");
abort();
flint_abort();
}
/* check lG(z+1) = lG(z) + lgamma(z) */
@ -83,7 +83,7 @@ int main()
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);

View file

@ -71,7 +71,7 @@ int main()
flint_printf("x = "); acb_printd(x, 15); flint_printf("\n\n");
flint_printf("res1 = "); acb_printd(res1, 15); flint_printf("\n\n");
flint_printf("res2 = "); acb_printd(res2, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(x);

View file

@ -51,7 +51,7 @@ int main()
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("d = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
acb_chebyshev_t_ui(b, n, b, prec);
@ -62,7 +62,7 @@ int main()
flint_printf("n = %wu\n\n", n);
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
acb_randtest(a, state, 1 + n_randint(state, 300), 5);
@ -80,7 +80,7 @@ int main()
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
abort();
flint_abort();
}
if (n == 0)
@ -96,7 +96,7 @@ int main()
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);

View file

@ -59,7 +59,7 @@ int main()
flint_printf("c = "); acb_printd(c, 15); flint_printf("\n\n");
flint_printf("d = "); acb_printd(d, 15); flint_printf("\n\n");
flint_printf("e = "); acb_printd(e, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_chebyshev_u_ui(b, n, b, prec);
@ -71,7 +71,7 @@ int main()
flint_printf("a = "); acb_printd(a, 15); flint_printf("\n\n");
flint_printf("b = "); acb_printd(b, 15); flint_printf("\n\n");
flint_printf("c = "); acb_printd(c, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_randtest(a, state, 1 + n_randint(state, 300), 5);
@ -89,7 +89,7 @@ int main()
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
abort();
flint_abort();
}
if (n == 0)
@ -105,7 +105,7 @@ int main()
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);

View file

@ -47,7 +47,7 @@ int main()
flint_printf("x = "); acb_print(x); flint_printf("\n\n");
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
abort();
flint_abort();
}
/* compare with cos */
@ -62,7 +62,7 @@ int main()
flint_printf("y = "); acb_print(y); flint_printf("\n\n");
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
acb_cos_pi(x, x, prec1);
@ -72,7 +72,7 @@ int main()
flint_printf("FAIL: aliasing\n\n");
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("x = "); acb_print(x); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(x);

View file

@ -49,7 +49,7 @@ int main()
flint_printf("x = "); acb_print(x); flint_printf("\n\n");
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
abort();
flint_abort();
}
/* check cot(x+y) = (cot(x) cot(y) - 1) / (cot(x) + cot(y)) */
@ -69,7 +69,7 @@ int main()
flint_printf("y = "); acb_print(y); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("d = "); acb_print(d); flint_printf("\n\n");
abort();
flint_abort();
}
acb_cot(x, x, prec1);
@ -79,7 +79,7 @@ int main()
flint_printf("FAIL: aliasing\n\n");
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("x = "); acb_print(x); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(x);

View file

@ -47,7 +47,7 @@ int main()
flint_printf("x = "); acb_print(x); flint_printf("\n\n");
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
abort();
flint_abort();
}
/* compare with cot */
@ -62,7 +62,7 @@ int main()
flint_printf("y = "); acb_print(y); flint_printf("\n\n");
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
acb_cot_pi(x, x, prec1);
@ -72,7 +72,7 @@ int main()
flint_printf("FAIL: aliasing\n\n");
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("x = "); acb_print(x); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(x);

View file

@ -49,7 +49,7 @@ int main()
flint_printf("x = "); acb_print(x); flint_printf("\n\n");
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
abort();
flint_abort();
}
/* check coth(x+y) = (1 + coth(x) coth(y)) / (coth(x) + coth(y)) */
@ -69,7 +69,7 @@ int main()
flint_printf("y = "); acb_print(y); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("d = "); acb_print(d); flint_printf("\n\n");
abort();
flint_abort();
}
acb_coth(x, x, prec1);
@ -79,7 +79,7 @@ int main()
flint_printf("FAIL: aliasing\n\n");
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("x = "); acb_print(x); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(x);

View file

@ -55,7 +55,7 @@ int main()
flint_printf("x = "); acb_printd(x, 15); flint_printf("\n\n");
flint_printf("a = "); arb_printd(a, 15); flint_printf("\n\n");
flint_printf("y = "); acb_printd(y, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(x);

View file

@ -45,7 +45,7 @@ int main()
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
acb_set(c, a);
@ -56,7 +56,7 @@ int main()
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
/* check digamma(z+1) = digamma(z) + 1/z */
@ -71,7 +71,7 @@ int main()
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);

View file

@ -46,7 +46,7 @@ int main()
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);
@ -79,7 +79,7 @@ int main()
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);
@ -115,7 +115,7 @@ int main()
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
flint_printf("d = "); acb_print(d); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);
@ -150,7 +150,7 @@ int main()
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);
@ -189,7 +189,7 @@ int main()
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
flint_printf("e = "); acb_print(e); flint_printf("\n\n");
flint_printf("f = "); acb_print(f); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);

View file

@ -53,7 +53,7 @@ int main()
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
flint_printf("d = "); acb_print(d); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);

View file

@ -48,7 +48,7 @@ int main()
flint_printf("FAIL: overlap\n\n");
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);

View file

@ -52,7 +52,7 @@ int main()
flint_printf("b = "); acb_printd(b, 30); flint_printf("\n\n");
flint_printf("c = "); acb_printd(c, 30); flint_printf("\n\n");
flint_printf("d = "); acb_printd(d, 30); flint_printf("\n\n");
abort();
flint_abort();
}
acb_set(c, a);
@ -65,7 +65,7 @@ int main()
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
flint_printf("d = "); acb_print(d); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);

View file

@ -45,7 +45,7 @@ int main()
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
/* check gamma(z+1) = z gamma(z) */
@ -59,7 +59,7 @@ int main()
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);

View file

@ -90,7 +90,7 @@ int main()
flint_printf("a = "); acb_printd(a, 30); flint_printf("\n\n");
flint_printf("b = "); acb_printd(b, 30); flint_printf("\n\n");
flint_printf("c = "); acb_printd(c, 30); flint_printf("\n\n");
abort();
flint_abort();
}
acb_set(c, a);
@ -102,7 +102,7 @@ int main()
flint_printf("a = "); acb_printd(a, 30); flint_printf("\n\n");
flint_printf("b = "); acb_printd(b, 30); flint_printf("\n\n");
flint_printf("c = "); acb_printd(c, 30); flint_printf("\n\n");
abort();
flint_abort();
}
acb_randtest(a, state, 1 + n_randint(state, 1000), 10);
@ -130,7 +130,7 @@ int main()
flint_printf("a = "); acb_printd(a, 30); flint_printf("\n\n");
flint_printf("b = "); acb_printd(b, 30); flint_printf("\n\n");
flint_printf("d = "); acb_printd(d, 30); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);

View file

@ -53,7 +53,7 @@ int main()
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
/* check lgamma(z+1) = lgamma(z) + log(z) */
@ -69,7 +69,7 @@ int main()
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);

View file

@ -47,7 +47,7 @@ int main()
flint_printf("x = "); acb_printd(x, 15); flint_printf("\n\n");
flint_printf("a = "); acb_printd(a, 15); flint_printf("\n\n");
flint_printf("b = "); acb_printd(b, 15); flint_printf("\n\n");
abort();
flint_abort();
}
/* check exp(log(x)) = x */
@ -58,7 +58,7 @@ int main()
flint_printf("FAIL: functional equation\n\n");
flint_printf("x = "); acb_printd(x, 15); flint_printf("\n\n");
flint_printf("b = "); acb_printd(b, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_log(x, x, prec1);
@ -68,7 +68,7 @@ int main()
flint_printf("FAIL: aliasing\n\n");
flint_printf("a = "); acb_printd(a, 15); flint_printf("\n\n");
flint_printf("x = "); acb_printd(x, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(x);

View file

@ -47,7 +47,7 @@ int main()
flint_printf("x = "); acb_printd(x, 15); flint_printf("\n\n");
flint_printf("a = "); acb_printd(a, 15); flint_printf("\n\n");
flint_printf("b = "); acb_printd(b, 15); flint_printf("\n\n");
abort();
flint_abort();
}
/* check log1p(x) = log(1+x) */
@ -60,7 +60,7 @@ int main()
flint_printf("x = "); acb_printd(x, 15); flint_printf("\n\n");
flint_printf("a = "); acb_printd(a, 15); flint_printf("\n\n");
flint_printf("b = "); acb_printd(b, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_log1p(x, x, prec1);
@ -70,7 +70,7 @@ int main()
flint_printf("FAIL: aliasing\n\n");
flint_printf("a = "); acb_printd(a, 15); flint_printf("\n\n");
flint_printf("x = "); acb_printd(x, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(x);

View file

@ -64,7 +64,7 @@ int main()
flint_printf("s1 = "); acb_printd(s1, 30); flint_printf("\n\n");
flint_printf("r = "); acb_printd(r, 30); flint_printf("\n\n");
flint_printf("r1 = "); acb_printd(r1, 30); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(s);

View file

@ -46,7 +46,7 @@ int main()
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);
@ -79,7 +79,7 @@ int main()
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);
@ -115,7 +115,7 @@ int main()
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
flint_printf("d = "); acb_print(d); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);
@ -150,7 +150,7 @@ int main()
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);
@ -189,7 +189,7 @@ int main()
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
flint_printf("e = "); acb_print(e); flint_printf("\n\n");
flint_printf("f = "); acb_print(f); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);
@ -232,7 +232,7 @@ int main()
flint_printf("y = "); acb_print(y); flint_printf("\n\n");
flint_printf("z = "); acb_print(z); flint_printf("\n\n");
flint_printf("v = "); acb_print(v); flint_printf("\n\n");
abort();
flint_abort();
}
break;
@ -247,7 +247,7 @@ int main()
flint_printf("x = "); acb_print(x); flint_printf("\n\n");
flint_printf("z = "); acb_print(z); flint_printf("\n\n");
flint_printf("v = "); acb_print(v); flint_printf("\n\n");
abort();
flint_abort();
}
break;
@ -261,7 +261,7 @@ int main()
flint_printf("x = "); acb_print(x); flint_printf("\n\n");
flint_printf("z = "); acb_print(z); flint_printf("\n\n");
flint_printf("v = "); acb_print(v); flint_printf("\n\n");
abort();
flint_abort();
}
break;
@ -275,7 +275,7 @@ int main()
flint_printf("x = "); acb_print(x); flint_printf("\n\n");
flint_printf("y = "); acb_print(y); flint_printf("\n\n");
flint_printf("v = "); acb_print(v); flint_printf("\n\n");
abort();
flint_abort();
}
break;
@ -289,7 +289,7 @@ int main()
flint_printf("x = "); acb_print(x); flint_printf("\n\n");
flint_printf("y = "); acb_print(y); flint_printf("\n\n");
flint_printf("v = "); acb_print(v); flint_printf("\n\n");
abort();
flint_abort();
}
break;
}

View file

@ -46,7 +46,7 @@ int main()
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);
@ -79,7 +79,7 @@ int main()
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);
@ -115,7 +115,7 @@ int main()
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
flint_printf("d = "); acb_print(d); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);
@ -150,7 +150,7 @@ int main()
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);
@ -189,7 +189,7 @@ int main()
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
flint_printf("e = "); acb_print(e); flint_printf("\n\n");
flint_printf("f = "); acb_print(f); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);

View file

@ -78,7 +78,7 @@ int main()
flint_printf("s = "); acb_print(s); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);

View file

@ -55,7 +55,7 @@ int main()
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
flint_printf("d = "); acb_print(d); flint_printf("\n\n");
abort();
flint_abort();
}
acb_randtest(c, state, 1 + n_randint(state, 1000), 200);
@ -76,7 +76,7 @@ int main()
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
flint_printf("d = "); acb_print(d); flint_printf("\n\n");
flint_printf("e = "); acb_print(e); flint_printf("\n\n");
abort();
flint_abort();
}
acb_pow(c, a, b, prec1);
@ -90,7 +90,7 @@ int main()
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
flint_printf("d = "); acb_print(d); flint_printf("\n\n");
abort();
flint_abort();
}
acb_set(d, b);
@ -103,7 +103,7 @@ int main()
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
flint_printf("d = "); acb_print(d); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);

View file

@ -53,7 +53,7 @@ int main()
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
flint_printf("e1 = "); fmpz_print(e1); flint_printf("\n\n");
abort();
flint_abort();
}
/* check a^(e1+e2) = a^e1*a^e2 */
@ -71,7 +71,7 @@ int main()
flint_printf("d = "); acb_print(d); flint_printf("\n\n");
flint_printf("e1 = "); fmpz_print(e1); flint_printf("\n\n");
flint_printf("e2 = "); fmpz_print(e2); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);

View file

@ -68,7 +68,7 @@ int main()
flint_printf("c = "); fmpz_print(c); flint_printf("\n\n");
flint_printf("r1 = "); acb_printd(r1, 30); flint_printf("\n\n");
flint_printf("r2 = "); acb_printd(r2, 30); flint_printf("\n\n");
abort();
flint_abort();
}
fmpz_clear(a);

View file

@ -43,7 +43,7 @@ int main()
flint_printf("x = "); arb_print(x); flint_printf("\n\n");
flint_printf("z = "); acb_print(z); flint_printf("\n\n");
flint_printf("a1 = %wd, a2 = %wd\n\n", a1, a2);
abort();
flint_abort();
}
acb_randtest_special(z, state, 1 + n_randint(state, 200), 1 + n_randint(state, 200));
@ -63,7 +63,7 @@ int main()
flint_printf("FAIL: swapping\n\n");
flint_printf("z = "); acb_print(z); flint_printf("\n\n");
flint_printf("a1 = %wd, a2 = %wd\n\n", a1, a2);
abort();
flint_abort();
}
acb_randtest_special(z, state, 1 + n_randint(state, 200), 1 + n_randint(state, 200));
@ -87,7 +87,7 @@ int main()
flint_printf("x = "); arb_print(x); flint_printf("\n\n");
flint_printf("z = "); acb_print(z); flint_printf("\n\n");
flint_printf("a1 = %wd, a2 = %wd\n\n", a1, a2);
abort();
flint_abort();
}
arb_clear(x);

View file

@ -45,7 +45,7 @@ int main()
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
/* check 1/gamma(z+1) = 1/gamma(z)/z */
@ -59,7 +59,7 @@ int main()
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);

View file

@ -64,7 +64,7 @@ int main()
flint_printf("u2 = "); acb_printd(u2, 15); flint_printf("\n\n");
flint_printf("v = "); acb_printd(v, 15); flint_printf("\n\n");
flint_printf("v2 = "); acb_printd(v2, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_set(u2, a);
@ -77,7 +77,7 @@ int main()
flint_printf("u = "); acb_printd(u, 15); flint_printf("\n\n");
flint_printf("u2 = "); acb_printd(u2, 15); flint_printf("\n\n");
flint_printf("n = %wu\n", n);
abort();
flint_abort();
}
acb_set(v2, a);
@ -90,7 +90,7 @@ int main()
flint_printf("v = "); acb_printd(v, 15); flint_printf("\n\n");
flint_printf("v2 = "); acb_printd(v2, 15); flint_printf("\n\n");
flint_printf("n = %wu\n", n);
abort();
flint_abort();
}
acb_clear(a);

View file

@ -64,7 +64,7 @@ int main()
flint_printf("u2 = "); acb_printd(u2, 15); flint_printf("\n\n");
flint_printf("v = "); acb_printd(v, 15); flint_printf("\n\n");
flint_printf("v2 = "); acb_printd(v2, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_set(u2, a);
@ -77,7 +77,7 @@ int main()
flint_printf("u = "); acb_printd(u, 15); flint_printf("\n\n");
flint_printf("u2 = "); acb_printd(u2, 15); flint_printf("\n\n");
flint_printf("n = %wu\n", n);
abort();
flint_abort();
}
acb_set(v2, a);
@ -90,7 +90,7 @@ int main()
flint_printf("v = "); acb_printd(v, 15); flint_printf("\n\n");
flint_printf("v2 = "); acb_printd(v2, 15); flint_printf("\n\n");
flint_printf("n = %wu\n", n);
abort();
flint_abort();
}
acb_clear(a);

View file

@ -64,7 +64,7 @@ int main()
flint_printf("u2 = "); acb_printd(u2, 15); flint_printf("\n\n");
flint_printf("v = "); acb_printd(v, 15); flint_printf("\n\n");
flint_printf("v2 = "); acb_printd(v2, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_set(u2, a);
@ -77,7 +77,7 @@ int main()
flint_printf("u = "); acb_printd(u, 15); flint_printf("\n\n");
flint_printf("u2 = "); acb_printd(u2, 15); flint_printf("\n\n");
flint_printf("n = %wu\n", n);
abort();
flint_abort();
}
acb_set(v2, a);
@ -90,7 +90,7 @@ int main()
flint_printf("v = "); acb_printd(v, 15); flint_printf("\n\n");
flint_printf("v2 = "); acb_printd(v2, 15); flint_printf("\n\n");
flint_printf("n = %wu\n", n);
abort();
flint_abort();
}
acb_clear(a);

View file

@ -52,7 +52,7 @@ int main()
flint_printf("xn = "); acb_print(xn); flint_printf("\n\n");
flint_printf("y = "); acb_print(y); flint_printf("\n\n");
flint_printf("z = "); acb_print(z); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(x);
@ -85,7 +85,7 @@ int main()
flint_printf("x = "); acb_print(x); flint_printf("\n\n");
flint_printf("y = "); acb_print(y); flint_printf("\n\n");
flint_printf("n = %wu\n", n);
abort();
flint_abort();
}
acb_clear(x);

View file

@ -52,7 +52,7 @@ int main()
flint_printf("xn = "); acb_print(xn); flint_printf("\n\n");
flint_printf("y = "); acb_print(y); flint_printf("\n\n");
flint_printf("z = "); acb_print(z); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(x);
@ -85,7 +85,7 @@ int main()
flint_printf("x = "); acb_print(x); flint_printf("\n\n");
flint_printf("y = "); acb_print(y); flint_printf("\n\n");
flint_printf("n = %wu\n", n);
abort();
flint_abort();
}
acb_clear(x);

View file

@ -47,7 +47,7 @@ int main()
flint_printf("x = "); acb_printd(x, 15); flint_printf("\n\n");
flint_printf("y = "); acb_printd(y, 15); flint_printf("\n\n");
flint_printf("z = "); acb_printd(z, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(x);

View file

@ -52,7 +52,7 @@ int main()
flint_printf("xn = "); acb_print(xn); flint_printf("\n\n");
flint_printf("y = "); acb_print(y); flint_printf("\n\n");
flint_printf("z = "); acb_print(z); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(x);
@ -85,7 +85,7 @@ int main()
flint_printf("x = "); acb_print(x); flint_printf("\n\n");
flint_printf("y = "); acb_print(y); flint_printf("\n\n");
flint_printf("n = %wu\n", n);
abort();
flint_abort();
}
acb_clear(x);

View file

@ -56,7 +56,7 @@ int main()
flint_printf("xn = "); acb_print(xn); flint_printf("\n\n");
flint_printf("y = "); acb_print(y); flint_printf("\n\n");
flint_printf("z = "); acb_print(z); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(x);
@ -92,7 +92,7 @@ int main()
flint_printf("x = "); acb_print(x); flint_printf("\n\n");
flint_printf("y = "); acb_print(y); flint_printf("\n\n");
flint_printf("n = %wu\n", n);
abort();
flint_abort();
}
acb_clear(x);

View file

@ -47,7 +47,7 @@ int main()
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
acb_root_ui(a, a, k, prec);
@ -55,7 +55,7 @@ int main()
if (!acb_equal(a, b))
{
flint_printf("FAIL: aliasing\n\n");
abort();
flint_abort();
}
acb_clear(a);

View file

@ -46,7 +46,7 @@ int main()
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
acb_rsqrt(a, a, prec);
@ -55,7 +55,7 @@ int main()
flint_printf("FAIL: aliasing\n\n");
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);

View file

@ -54,7 +54,7 @@ int main()
flint_printf("x = "); acb_printd(x, 15); flint_printf("\n\n");
flint_printf("a = "); acb_printd(a, 15); flint_printf("\n\n");
flint_printf("b = "); acb_printd(b, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_sgn(x, x, prec);
@ -65,7 +65,7 @@ int main()
flint_printf("x = "); acb_printd(x, 15); flint_printf("\n\n");
flint_printf("a = "); acb_printd(a, 15); flint_printf("\n\n");
flint_printf("b = "); acb_printd(b, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(x);

View file

@ -57,7 +57,7 @@ int main()
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
flint_printf("d = "); acb_print(d); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);
@ -106,7 +106,7 @@ int main()
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
flint_printf("d = "); acb_print(d); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);

View file

@ -47,7 +47,7 @@ int main()
flint_printf("x = "); acb_print(x); flint_printf("\n\n");
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
abort();
flint_abort();
}
/* compare with cos */
@ -62,7 +62,7 @@ int main()
flint_printf("y = "); acb_print(y); flint_printf("\n\n");
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
acb_sin_pi(x, x, prec1);
@ -72,7 +72,7 @@ int main()
flint_printf("FAIL: aliasing\n\n");
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("x = "); acb_print(x); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(x);

View file

@ -46,7 +46,7 @@ int main()
flint_printf("b = "); acb_printd(b, 30); flint_printf("\n\n");
flint_printf("c = "); acb_printd(c, 30); flint_printf("\n\n");
flint_printf("d = "); acb_printd(d, 30); flint_printf("\n\n");
abort();
flint_abort();
}
acb_set(c, a);
@ -58,7 +58,7 @@ int main()
flint_printf("a = "); acb_printd(a, 30); flint_printf("\n\n");
flint_printf("b = "); acb_printd(c, 30); flint_printf("\n\n");
flint_printf("c = "); acb_printd(c, 30); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);

View file

@ -57,7 +57,7 @@ int main()
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
flint_printf("d = "); acb_print(d); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);
@ -106,7 +106,7 @@ int main()
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
flint_printf("d = "); acb_print(d); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);

View file

@ -45,7 +45,7 @@ int main()
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
acb_sqrt(a, a, prec);
@ -54,7 +54,7 @@ int main()
flint_printf("FAIL: aliasing\n\n");
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);

View file

@ -49,7 +49,7 @@ int main()
flint_printf("x = "); acb_print(x); flint_printf("\n\n");
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
abort();
flint_abort();
}
/* check tan(x+y) = (tan(x) + tan(y)) / (1 - tan(x) tan(y)) */
@ -70,7 +70,7 @@ int main()
flint_printf("y = "); acb_print(y); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("d = "); acb_print(d); flint_printf("\n\n");
abort();
flint_abort();
}
acb_tan(x, x, prec1);
@ -80,7 +80,7 @@ int main()
flint_printf("FAIL: aliasing\n\n");
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("x = "); acb_print(x); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(x);

View file

@ -47,7 +47,7 @@ int main()
flint_printf("x = "); acb_print(x); flint_printf("\n\n");
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
abort();
flint_abort();
}
/* compare with tan */
@ -62,7 +62,7 @@ int main()
flint_printf("y = "); acb_print(y); flint_printf("\n\n");
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
acb_tan_pi(x, x, prec1);
@ -72,7 +72,7 @@ int main()
flint_printf("FAIL: aliasing\n\n");
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("x = "); acb_print(x); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(x);

View file

@ -49,7 +49,7 @@ int main()
flint_printf("x = "); acb_print(x); flint_printf("\n\n");
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
abort();
flint_abort();
}
/* check tanh(x+y) = (tanh(x) + tanh(y)) / (1 + tanh(x) tanh(y)) */
@ -69,7 +69,7 @@ int main()
flint_printf("y = "); acb_print(y); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("d = "); acb_print(d); flint_printf("\n\n");
abort();
flint_abort();
}
acb_tanh(x, x, prec1);
@ -79,7 +79,7 @@ int main()
flint_printf("FAIL: aliasing\n\n");
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("x = "); acb_print(x); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(x);

View file

@ -46,7 +46,7 @@ int main()
flint_printf("n = %wu k = %wd\n\n", iter, k);
flint_printf("vec = "); acb_printn(vec + k, 30, 0); flint_printf("\n\n");
flint_printf("t = "); acb_printn(t, 30, 0); flint_printf("\n\n");
abort();
flint_abort();
}
}

View file

@ -45,7 +45,7 @@ int main()
flint_printf("a = "); acb_print(a); flint_printf("\n\n");
flint_printf("b = "); acb_print(b); flint_printf("\n\n");
flint_printf("c = "); acb_print(c); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(a);

View file

@ -72,7 +72,7 @@ int main()
flint_printf("r = %wd, prec = %wd, maxdepth = %wd\n\n", r, prec, maxdepth);
arb_printd(b, 15); flint_printf("\n\n");
arb_printd(ans, 15); flint_printf("\n\n");
abort();
flint_abort();
}
arb_clear(b);

View file

@ -76,7 +76,7 @@ int main()
flint_printf("b = "); acb_printd(b, 15); flint_printf("\n");
flint_printf("res = "); acb_printd(res, 15); flint_printf("\n\n");
flint_printf("ans = "); acb_printd(ans, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(ans);

View file

@ -28,7 +28,7 @@ void _acb_dirichlet_euler_product_real_ui(arb_t res, ulong s,
return;
}
if (prec < 2) abort(); /* assert */
if (prec < 2) flint_abort(); /* assert */
/* L(s), 1/L(s) = 1 + ... For s >= 3, zeta(s,2) < 2^(1-s). */
if (s > (ulong) prec)

View file

@ -21,7 +21,7 @@ acb_dirichlet_gauss_sum_theta(acb_t res, const dirichlet_group_t G, const dirich
flint_printf("gauss_sum_theta: non available for non primitive character"
"or exceptional characters chi_300(71,.), chi_300(131,.), "
"chi_600(11,.) and chi_600(491,.)\n");
abort();
flint_abort();
}
else
{

View file

@ -48,7 +48,7 @@ acb_dirichlet_hardy_theta(acb_ptr res, const acb_t t,
if (q != dirichlet_conductor_char(G, chi))
{
flint_printf("hardy theta: need primitive character\n");
abort();
flint_abort();
}
}

View file

@ -20,7 +20,7 @@ acb_dirichlet_hurwitz_precomp_eval(acb_t res,
acb_t a, t;
if (p > q)
abort();
flint_abort();
acb_init(a);
acb_init(t);

View file

@ -19,7 +19,7 @@ acb_dirichlet_hurwitz_precomp_init(acb_dirichlet_hurwitz_precomp_t pre,
slong i, k;
if (A < 1 || K < 1 || N < 1)
abort();
flint_abort();
pre->deflate = deflate;
pre->A = A;

View file

@ -62,7 +62,7 @@ acb_dirichlet_powsum_smooth(acb_ptr res, const acb_t s, ulong N, slong d, slong
}
if (N >= UWORD_MAX - 2)
abort();
flint_abort();
critical_line = arb_is_exact(acb_realref(s)) &&
(arf_cmp_2exp_si(arb_midref(acb_realref(s)), -1) == 0);

View file

@ -53,7 +53,7 @@ int main(int argc, char *argv[])
else
{
printf("usage: %s [log|csv|json]\n", argv[0]);
abort();
flint_abort();
}
if (out == CSV)

View file

@ -52,7 +52,7 @@ int main(int argc, char *argv[])
else
{
printf("usage: %s [log|csv|json]\n", argv[0]);
abort();
flint_abort();
}
if (out == CSV)

View file

@ -119,7 +119,7 @@ int main(int argc, char *argv[])
else
{
printf("usage: %s [log|csv|json]\n", argv[0]);
abort();
flint_abort();
}
if (out == CSV)

View file

@ -88,7 +88,7 @@ acb_dirichlet_root(acb_t z, const acb_dirichlet_roots_t t, ulong k, slong prec)
}
if (k != 0)
abort();
flint_abort();
acb_set_round(z, z, prec);
}

View file

@ -34,7 +34,7 @@ acb_dirichlet_root_number(acb_t res, const dirichlet_group_t G, const dirichlet_
if (dirichlet_conductor_char(G, chi) < G->q)
{
flint_printf("root number: need primitive character\n");
abort();
flint_abort();
}
else if (G->num > 1)
{

View file

@ -64,7 +64,7 @@ int main()
flint_printf("log(m) = "); dirichlet_char_print(G, chi);
dirichlet_char_log(chi, G, n1);
flint_printf("log(n1) = "); dirichlet_char_print(G, chi);
abort();
flint_abort();
}
acb_dirichlet_pairing(zn2, G, m, n2, 53);
@ -82,7 +82,7 @@ int main()
flint_printf("zn2 = "); acb_printd(zn2, 15); flint_printf("\n\n");
flint_printf("zn1n2 = "); acb_printd(zn1n2, 15); flint_printf("\n\n");
flint_printf("zn1zn2 = "); acb_printd(zn1zn2, 15); flint_printf("\n\n");
abort();
flint_abort();
}
}
@ -113,7 +113,7 @@ int main()
flint_printf("phi = %wu\n\n", n_euler_phi(q));
flint_printf("n1 = %wu\n\n", n1);
flint_printf("zn1 = "); acb_printd(zn1, 15); flint_printf("\n\n");
abort();
flint_abort();
}
}

View file

@ -51,7 +51,7 @@ int main()
flint_printf("s2 = "); acb_printn(s2, 50, 0); flint_printf("\n\n");
flint_printf("z1 = "); acb_printn(z1, 50, 0); flint_printf("\n\n");
flint_printf("z2 = "); acb_printn(z2, 50, 0); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(s1);

View file

@ -88,7 +88,7 @@ int main()
flint_printf("chi: %d\n", choice);
flint_printf("res1 = "); arb_printd(res1, prec1 / 3.33); flint_printf("\n\n");
flint_printf("res2 = "); arb_printd(res2, prec2 / 3.33); flint_printf("\n\n");
abort();
flint_abort();
}
if (s >= 6 && prec1 < 2 * s * log(s))
@ -99,7 +99,7 @@ int main()
{
flint_printf("FAIL: accuracy = %wd, prec = %wd\n\n", accuracy, prec1);
flint_printf("res1 = "); arb_printd(res1, prec1 / 3.33); flint_printf("\n\n");
abort();
flint_abort();
}
}
@ -117,7 +117,7 @@ int main()
flint_printf("chi: %d\n", choice);
flint_printf("res1 = "); arb_printd(res1, prec1 / 3.33); flint_printf("\n\n");
flint_printf("res2 = "); arb_printd(res2, prec2 / 3.33); flint_printf("\n\n");
abort();
flint_abort();
}
}

View file

@ -60,7 +60,7 @@ int main()
acb_printd(s3, 25);
flint_printf("\ntheta ");
acb_printd(s4, 25);
abort();
flint_abort();
}
if (dirichlet_char_next(chi, G) < 0)

View file

@ -68,7 +68,7 @@ int main()
flint_printf("S = "); acb_poly_printd(S, 15); flint_printf("\n\n");
flint_printf("A = "); acb_poly_printd(A, 15); flint_printf("\n\n");
flint_printf("B = "); acb_poly_printd(B, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_poly_clear(S);

View file

@ -72,7 +72,7 @@ int main()
flint_printf("s = "); acb_printn(s, 50, 0); flint_printf("\n\n");
flint_printf("r1 = "); acb_printn(vec1 + i, 50, 0); flint_printf("\n\n");
flint_printf("r2 = "); acb_printn(vec2 + i, 50, 0); flint_printf("\n\n");
abort();
flint_abort();
}
}
@ -86,7 +86,7 @@ int main()
flint_printf("iter = %wd q = %wu k = %wu i = %wd\n\n", iter, q, k, i);
flint_printf("s = "); acb_printn(s, 50, 0); flint_printf("\n\n");
flint_printf("r1 = "); acb_printn(vec1 + i, 50, 0); flint_printf("\n\n");
abort();
flint_abort();
}
}
}
@ -101,7 +101,7 @@ int main()
flint_printf("iter = %wd q = %wu k = %wu i = %wd\n\n", iter, q, k, i);
flint_printf("s = "); acb_printn(s, 50, 0); flint_printf("\n\n");
flint_printf("r1 = "); acb_printn(vec2 + i, 50, 0); flint_printf("\n\n");
abort();
flint_abort();
}
}
}

View file

@ -70,7 +70,7 @@ int main()
flint_printf("S = "); acb_poly_printd(S, 15); flint_printf("\n\n");
flint_printf("A = "); acb_poly_printd(A, 15); flint_printf("\n\n");
flint_printf("B = "); acb_poly_printd(B, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_poly_clear(S);

View file

@ -67,7 +67,7 @@ int main()
flint_printf("p = %wu q = %wu\n\n", p, q);
flint_printf("z1 = "); acb_printn(z1, 50, 0); flint_printf("\n\n");
flint_printf("z2 = "); acb_printn(z2, 50, 0); flint_printf("\n\n");
abort();
flint_abort();
}
}

View file

@ -63,7 +63,7 @@ int main()
dirichlet_conductor_char(G, chi2),
dirichlet_conductor_ui(G, nmod_mul(chi1->n, chi2->n, G->mod))
);
abort();
flint_abort();
}
if (dirichlet_char_next(chi2, G) < 0)
break;

View file

@ -56,7 +56,7 @@ int main()
flint_printf("s = "); acb_printn(s, 100, 0); flint_printf("\n\n");
flint_printf("t = "); acb_printn(t, 100, 0); flint_printf("\n\n");
flint_printf("u = "); acb_printn(u, 100, 0); flint_printf("\n\n");
abort();
flint_abort();
}
dirichlet_char_clear(chi);

View file

@ -67,7 +67,7 @@ int main()
flint_printf("s = "); acb_printn(s, 100, 0); flint_printf("\n\n");
flint_printf("t = "); acb_printn(t, 100, 0); flint_printf("\n\n");
flint_printf("u = "); acb_printn(u, 100, 0); flint_printf("\n\n");
abort();
flint_abort();
}
dirichlet_char_clear(chi);

View file

@ -83,7 +83,7 @@ int main()
{
flint_printf("error while setting x[%ld] <- %s+I*%s\n",
j, x_r[j], x_i[j]);
abort();
flint_abort();
}
}
@ -109,7 +109,7 @@ int main()
{
flint_printf("error while setting ref <- %s+I*%s\n",
ref_r[i * nx + j], ref_i[i * nx + j]);
abort();
flint_abort();
}
acb_dirichlet_l_hurwitz(res, x + j, NULL, G, chi, prec + 10);
@ -126,7 +126,7 @@ int main()
flint_printf("\nl(chi,x) = ");
acb_printd(res, 54);
flint_printf("\n\n");
abort();
flint_abort();
}
}

View file

@ -97,7 +97,7 @@ int main()
flint_printf("q = %wu i = %wd\n\n", q, i);
flint_printf("r1 = "); acb_printn(vec + i, 50, 0); flint_printf("\n\n");
flint_printf("r2 = "); acb_printn(t, 50, 0); flint_printf("\n\n");
abort();
flint_abort();
}
}
@ -182,7 +182,7 @@ int main()
flint_printf("s = "); acb_printn(s, 50, 0); flint_printf("\n\n");
flint_printf("r1 = "); acb_printn(vec1 + i, 50, 0); flint_printf("\n\n");
flint_printf("r2 = "); acb_printn(vec2 + i, 50, 0); flint_printf("\n\n");
abort();
flint_abort();
}
}

View file

@ -63,7 +63,7 @@ int main()
flint_printf("S = "); acb_poly_printd(S, 15); flint_printf("\n\n");
flint_printf("A = "); acb_poly_printd(A, 15); flint_printf("\n\n");
flint_printf("B = "); acb_poly_printd(B, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_poly_clear(S);

View file

@ -61,7 +61,7 @@ int main()
flint_printf("s = "); acb_printd(s, prec / 3.33); flint_printf("\n\n");
flint_printf("z1 = "); acb_printd(z1 + i, prec / 3.33); flint_printf("\n\n");
flint_printf("z2 = "); acb_printd(z2 + i, prec / 3.33); flint_printf("\n\n");
abort();
flint_abort();
}
}

View file

@ -51,7 +51,7 @@ int main()
flint_printf("iter = %wd n = %wu k = %wu prec = %wd\n\n", iter, n, k, prec);
flint_printf("x = "); acb_printn(x, 30, 0); flint_printf("\n\n");
flint_printf("z = "); acb_printn(z, 30, 0); flint_printf("\n\n");
abort();
flint_abort();
}
}

View file

@ -88,7 +88,7 @@ int main()
flint_printf("\n");
dirichlet_char_print(G, chi);
flint_printf("\n");
abort();
flint_abort();
}
}
else if (acb_contains_zero(sum))
@ -98,7 +98,7 @@ int main()
flint_printf("\n");
dirichlet_char_print(G, chi);
flint_printf("\n");
abort();
flint_abort();
}
} while (dirichlet_char_next_primitive(chi, G) >= 0);

View file

@ -80,7 +80,7 @@ int main()
flint_printf("zbound = "); mag_printd(zbound, 10); flint_printf("\n\n");
flint_printf("x = "); arb_printn(x, 50, 0); flint_printf("\n\n");
flint_printf("y = "); arb_printn(y, 50, 0); flint_printf("\n\n");
abort();
flint_abort();
}
}

View file

@ -67,7 +67,7 @@ int main()
flint_printf("s2 = "); acb_printn(s2, 50, 0); flint_printf("\n\n");
flint_printf("z1 = "); acb_printn(z1, 50, 0); flint_printf("\n\n");
flint_printf("z2 = "); acb_printn(z2, 50, 0); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(s1);

View file

@ -77,7 +77,7 @@ int main()
flint_printf("s2 = "); acb_printn(s2, 50, 0); flint_printf("\n\n");
flint_printf("z1 = "); acb_printn(z1, 50, 0); flint_printf("\n\n");
flint_printf("z2 = "); acb_printn(z2, 50, 0); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(s1);

View file

@ -102,7 +102,7 @@ int main()
flint_printf("r1 = "); acb_printd(r1, 30); flint_printf("\n\n");
flint_printf("r2 = "); acb_printd(r2, 30); flint_printf("\n\n");
flint_printf("r3 = "); acb_printd(r3, 30); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(z1);

View file

@ -102,7 +102,7 @@ int main()
flint_printf("r1 = "); acb_printd(r1, 30); flint_printf("\n\n");
flint_printf("r2 = "); acb_printd(r2, 30); flint_printf("\n\n");
flint_printf("r3 = "); acb_printd(r3, 30); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(z1);

View file

@ -49,7 +49,7 @@ int main()
flint_printf("z = "); acb_printd(z, 30); flint_printf("\n\n");
flint_printf("w = "); acb_printd(w, 30); flint_printf("\n\n");
flint_printf("pw = "); acb_printd(pw, 30); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(tau);

View file

@ -61,7 +61,7 @@ int main()
flint_printf("g3 = "); acb_printd(g3, 30); flint_printf("\n\n");
flint_printf("h2 = "); acb_printd(h2, 30); flint_printf("\n\n");
flint_printf("h3 = "); acb_printd(h3, 30); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(tau);

View file

@ -76,7 +76,7 @@ int main()
flint_printf("m = "); acb_printd(m, 30); flint_printf("\n\n");
flint_printf("r1 = "); acb_printd(r1, 30); flint_printf("\n\n");
flint_printf("r2 = "); acb_printd(r2, 30); flint_printf("\n\n");
abort();
flint_abort();
}
}
}
@ -98,7 +98,7 @@ int main()
flint_printf("n = "); acb_printd(n, 30); flint_printf("\n\n");
flint_printf("r1 = "); acb_printd(r1, 30); flint_printf("\n\n");
flint_printf("r2 = "); acb_printd(r2, 30); flint_printf("\n\n");
abort();
flint_abort();
}
acb_elliptic_pi(r1, n, m, prec1);
@ -119,7 +119,7 @@ int main()
flint_printf("m = "); acb_printd(m, 30); flint_printf("\n\n");
flint_printf("r1 = "); acb_printd(r1, 30); flint_printf("\n\n");
flint_printf("r2 = "); acb_printd(r2, 30); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(n);

View file

@ -106,7 +106,7 @@ int main()
flint_printf("r1 = "); acb_printd(r1, 30); flint_printf("\n\n");
flint_printf("r2 = "); acb_printd(r2, 30); flint_printf("\n\n");
flint_printf("r3 = "); acb_printd(r3, 30); flint_printf("\n\n");
abort();
flint_abort();
}
/* test http://functions.wolfram.com/EllipticIntegrals/EllipticPi3/03/01/01/0006/ */
@ -143,7 +143,7 @@ int main()
flint_printf("n = "); acb_printd(n, 30); flint_printf("\n\n");
flint_printf("r1 = "); acb_printd(r1, 30); flint_printf("\n\n");
flint_printf("r2 = "); acb_printd(r2, 30); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(z1);

View file

@ -54,7 +54,7 @@ int main()
flint_printf("x = "); acb_printd(x, 30); flint_printf("\n\n");
flint_printf("r1 = "); acb_printd(r1, 30); flint_printf("\n\n");
flint_printf("r2 = "); acb_printd(r2, 30); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(x);

View file

@ -71,7 +71,7 @@ int main()
flint_printf("z = "); acb_printd(z, 30); flint_printf("\n\n");
flint_printf("r1 = "); acb_printd(r1, 30); flint_printf("\n\n");
flint_printf("r2 = "); acb_printd(r2, 30); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(x);

View file

@ -74,7 +74,7 @@ int main()
flint_printf("z = "); acb_printd(z, 30); flint_printf("\n\n");
flint_printf("r1 = "); acb_printd(r1, 30); flint_printf("\n\n");
flint_printf("r2 = "); acb_printd(r2, 30); flint_printf("\n\n");
abort();
flint_abort();
}
}
}
@ -116,7 +116,7 @@ int main()
flint_printf("z = "); acb_printd(z, 30); flint_printf("\n\n");
flint_printf("r1 = "); acb_printd(r1, 30); flint_printf("\n\n");
flint_printf("r2 = "); acb_printd(r2, 30); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(x);

View file

@ -86,7 +86,7 @@ int main()
flint_printf("p = "); acb_printd(p, 30); flint_printf("\n\n");
flint_printf("r1 = "); acb_printd(r1, 30); flint_printf("\n\n");
flint_printf("r2 = "); acb_printd(r2, 30); flint_printf("\n\n");
abort();
flint_abort();
}
}
}
@ -113,7 +113,7 @@ int main()
flint_printf("z = "); acb_printd(z, 30); flint_printf("\n\n");
flint_printf("r1 = "); acb_printd(r1, 30); flint_printf("\n\n");
flint_printf("r2 = "); acb_printd(r2, 30); flint_printf("\n\n");
abort();
flint_abort();
}
}
}
@ -136,7 +136,7 @@ int main()
flint_printf("p = "); acb_printd(p, 30); flint_printf("\n\n");
flint_printf("r1 = "); acb_printd(r1, 30); flint_printf("\n\n");
flint_printf("r2 = "); acb_printd(r2, 30); flint_printf("\n\n");
abort();
flint_abort();
}
acb_randtest(p, state, 1 + n_randint(state, 300), 1 + n_randint(state, 30));
@ -191,7 +191,7 @@ int main()
flint_printf("p = "); acb_printd(p, 30); flint_printf("\n\n");
flint_printf("r1 = "); acb_printd(r1, 30); flint_printf("\n\n");
flint_printf("r2 = "); acb_printd(r2, 30); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(x);

View file

@ -75,7 +75,7 @@ int main()
flint_printf("z = "); acb_printd(z, 15); flint_printf("\n\n");
flint_printf("p1 = "); acb_printd(p1, 15); flint_printf("\n\n");
flint_printf("p2 = "); acb_printd(p2, 15); flint_printf("\n\n");
abort();
flint_abort();
}
}
@ -150,7 +150,7 @@ int main()
flint_printf("z2 = "); acb_printd(z2, 15); flint_printf("\n\n");
flint_printf("p1 = "); acb_printd(p1, 15); flint_printf("\n\n");
flint_printf("p2 = "); acb_printd(p2, 15); flint_printf("\n\n");
abort();
flint_abort();
}
acb_clear(tau);

Some files were not shown because too many files have changed in this diff Show more