use arb_test_multiplier to control number of test iterations

acb/test/t-acos.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t x, a, b;
         slong prec1, prec2;

acb/test/t-acosh.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t x, a, b;
         slong prec1, prec2;

acb/test/t-agm1.c

@@ -134,7 +134,7 @@ int main()
     }
 
     /* self-consistency test */
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_ptr m1, m2;
         acb_t z1, z2, t;

acb/test/t-asin.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t x, a, b;
         slong prec1, prec2;

acb/test/t-asinh.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t x, a, b;
         slong prec1, prec2;

acb/test/t-atan.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t x, a, b;
         slong prec1, prec2;

acb/test/t-atanh.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t x, a, b;
         slong prec1, prec2;

acb/test/t-barnes_g.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c, d;
         slong prec1, prec2;

acb/test/t-bernoulli_poly_ui.c

@@ -37,7 +37,7 @@ int main()
     flint_randinit(state);
 
     /* test multiplication theorem */
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t x, t, res1, res2;
         ulong n, m, k;

acb/test/t-chebyshev_t_ui.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c, d;
         ulong n;

acb/test/t-chebyshev_u_ui.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c, d, e;
         ulong n;

acb/test/t-cos_pi.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t x, y, a, b, c;
         slong prec1, prec2;

acb/test/t-cot.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t x, y, a, b, c, d;
         slong prec1, prec2;

acb/test/t-cot_pi.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t x, y, a, b, c;
         slong prec1, prec2;

acb/test/t-coth.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t x, y, a, b, c, d;
         slong prec1, prec2;

acb/test/t-csgn.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t x, y;
         arb_t a;

acb/test/t-digamma.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 3000; iter++)
+    for (iter = 0; iter < 3000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c;
         slong prec1, prec2;

acb/test/t-div.c

@@ -36,7 +36,7 @@ int main()
     flint_randinit(state);
 
     /* test aliasing of c and a */
-    for (iter = 0; iter < 100000; iter++)
+    for (iter = 0; iter < 100000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c;
         slong prec;
@@ -69,7 +69,7 @@ int main()
     }
 
     /* test aliasing of c and b */
-    for (iter = 0; iter < 100000; iter++)
+    for (iter = 0; iter < 100000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c;
         slong prec;
@@ -102,7 +102,7 @@ int main()
     }
 
     /* test aliasing a, a */
-    for (iter = 0; iter < 100000; iter++)
+    for (iter = 0; iter < 100000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c, d;
         slong prec;
@@ -139,7 +139,7 @@ int main()
     }
 
     /* test aliasing a, a, a */
-    for (iter = 0; iter < 100000; iter++)
+    for (iter = 0; iter < 100000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c;
         slong prec;
@@ -173,7 +173,7 @@ int main()
     }
 
     /* test (a+b)/c = a/c + b/c */
-    for (iter = 0; iter < 100000; iter++)
+    for (iter = 0; iter < 100000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c, d, e, f;
 

acb/test/t-exp.c

@@ -36,7 +36,7 @@ int main()
     flint_randinit(state);
 
     /* check exp(a+b) = exp(a)*exp(b) */
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c, d, e;
         slong prec;

acb/test/t-exp_invexp.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c, d, e;
         slong prec;

acb/test/t-exp_pi_i.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c, d;
         slong prec;

acb/test/t-gamma.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 3000; iter++)
+    for (iter = 0; iter < 3000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c;
         slong prec1, prec2;

acb/test/t-lgamma.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c;
         slong prec1, prec2;

acb/test/t-log.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t x, a, b;
         slong prec1, prec2;

acb/test/t-log1p.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t x, a, b;
         slong prec1, prec2;

acb/test/t-log_sin_pi.c

@@ -36,7 +36,7 @@ int main()
     flint_randinit(state);
 
     /* check functional equation S(s+1) = S(s) + log(-s) - log(s) */
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t s, s1, r, r1, t;
         slong prec;

acb/test/t-mul.c

@@ -36,7 +36,7 @@ int main()
     flint_randinit(state);
 
     /* test aliasing of c and a */
-    for (iter = 0; iter < 100000; iter++)
+    for (iter = 0; iter < 100000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c;
         slong prec;
@@ -69,7 +69,7 @@ int main()
     }
 
     /* test aliasing of c and b */
-    for (iter = 0; iter < 100000; iter++)
+    for (iter = 0; iter < 100000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c;
         slong prec;
@@ -102,7 +102,7 @@ int main()
     }
 
     /* test aliasing a, a */
-    for (iter = 0; iter < 100000; iter++)
+    for (iter = 0; iter < 100000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c, d;
         slong prec;
@@ -139,7 +139,7 @@ int main()
     }
 
     /* test aliasing a, a, a */
-    for (iter = 0; iter < 100000; iter++)
+    for (iter = 0; iter < 100000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c;
         slong prec;
@@ -173,7 +173,7 @@ int main()
     }
 
     /* test a*(b+c) = a*b + a*c */
-    for (iter = 0; iter < 100000; iter++)
+    for (iter = 0; iter < 100000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c, d, e, f;
 
@@ -216,7 +216,7 @@ int main()
 
     /* compare with mul_naive */
     /* main test */
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t x, y, z, v;
         slong prec;

acb/test/t-mul_naive.c

@@ -36,7 +36,7 @@ int main()
     flint_randinit(state);
 
     /* test aliasing of c and a */
-    for (iter = 0; iter < 100000; iter++)
+    for (iter = 0; iter < 100000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c;
         slong prec;
@@ -69,7 +69,7 @@ int main()
     }
 
     /* test aliasing of c and b */
-    for (iter = 0; iter < 100000; iter++)
+    for (iter = 0; iter < 100000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c;
         slong prec;
@@ -102,7 +102,7 @@ int main()
     }
 
     /* test aliasing a, a */
-    for (iter = 0; iter < 100000; iter++)
+    for (iter = 0; iter < 100000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c, d;
         slong prec;
@@ -139,7 +139,7 @@ int main()
     }
 
     /* test aliasing a, a, a */
-    for (iter = 0; iter < 100000; iter++)
+    for (iter = 0; iter < 100000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c;
         slong prec;
@@ -173,7 +173,7 @@ int main()
     }
 
     /* test a*(b+c) = a*b + a*c */
-    for (iter = 0; iter < 100000; iter++)
+    for (iter = 0; iter < 100000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c, d, e, f;
 

acb/test/t-polygamma.c

@@ -43,7 +43,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t a, s, b, c;
         slong prec1, prec2;

acb/test/t-pow.c

@@ -36,7 +36,7 @@ int main()
     flint_randinit(state);
 
     /* check large arguments */
-    for (iter = 0; iter < 20000; iter++)
+    for (iter = 0; iter < 20000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c, d, e, f;
         slong prec1, prec2;

acb/test/t-pow_fmpz.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 5000; iter++)
+    for (iter = 0; iter < 5000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c, d;
         fmpz_t e1, e2, e3;

acb/test/t-quadratic_roots_fmpz.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t r1, r2, x, y;
         fmpz_t a, b, c;

acb/test/t-rel_accuracy_bits.c

@@ -36,7 +36,7 @@ int main()
     flint_randinit(state);
 
     /* test aliasing of c and a */
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         arb_t x;
         acb_t z;

acb/test/t-rgamma.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 3000; iter++)
+    for (iter = 0; iter < 3000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c;
         slong prec1, prec2;

acb/test/t-rising2_ui.c

@@ -36,7 +36,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t a, u, v, u2, v2;
         fmpz *f;

acb/test/t-rising2_ui_bs.c

@@ -36,7 +36,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t a, u, v, u2, v2;
         fmpz *f;

acb/test/t-rising2_ui_rs.c

@@ -36,7 +36,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t a, u, v, u2, v2;
         fmpz *f;

acb/test/t-rising_ui.c

@@ -36,7 +36,7 @@ int main()
     flint_randinit(state);
 
     /* check functional equation */
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t x, xn, y, z;
         ulong n, m;
@@ -76,7 +76,7 @@ int main()
     }
 
     /* aliasing of y and x */
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t x, y;
         ulong n;

acb/test/t-rising_ui_bs.c

@@ -36,7 +36,7 @@ int main()
     flint_randinit(state);
 
     /* check functional equation */
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t x, xn, y, z;
         ulong n, m;
@@ -76,7 +76,7 @@ int main()
     }
 
     /* aliasing of y and x */
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t x, y;
         ulong n;

acb/test/t-rising_ui_get_mag.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t x, y, z;
         mag_t b;

acb/test/t-rising_ui_rec.c

@@ -36,7 +36,7 @@ int main()
     flint_randinit(state);
 
     /* check functional equation */
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t x, xn, y, z;
         ulong n, m;
@@ -76,7 +76,7 @@ int main()
     }
 
     /* aliasing of y and x */
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t x, y;
         ulong n;

acb/test/t-rising_ui_rs.c

@@ -36,7 +36,7 @@ int main()
     flint_randinit(state);
 
     /* check functional equation */
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t x, xn, y, z;
         ulong n, m, step1, step2, step3;
@@ -80,7 +80,7 @@ int main()
     }
 
     /* aliasing of y and x */
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t x, y;
         ulong n;

acb/test/t-root_ui.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c;
         ulong k;

acb/test/t-rsqrt.c

@@ -36,7 +36,7 @@ int main()
     flint_randinit(state);
 
     /* check (a^(-1/2))^(-2) = a */
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c;
         slong prec;

acb/test/t-sgn.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t x, a, b;
         slong prec;

acb/test/t-sin_cos.c

@@ -36,7 +36,7 @@ int main()
     flint_randinit(state);
 
     /* check sin(a+b) = cos(b)*sin(a) + cos(a)*sin(b) */
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c, d, cosa, sina, cosb, sinb;
         slong prec;
@@ -85,7 +85,7 @@ int main()
     }
 
     /* check cos(a+b) = cos(b)*cos(a) - sin(a)*sin(b) */
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c, d, cosa, sina, cosb, sinb;
         slong prec;

acb/test/t-sin_pi.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t x, y, a, b, c;
         slong prec1, prec2;

acb/test/t-sinc.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c, d;
 

acb/test/t-sinh_cosh.c

@@ -36,7 +36,7 @@ int main()
     flint_randinit(state);
 
     /* check sinh(a+b) = cosh(b)*sinh(a) + cosh(a)*sinh(b) */
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c, d, cosa, sina, cosb, sinb;
         slong prec;
@@ -85,7 +85,7 @@ int main()
     }
 
     /* check cosh(a+b) = cosh(b)*cosh(a) + sinh(a)*sinh(b) */
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c, d, cosa, sina, cosb, sinb;
         slong prec;

acb/test/t-sqrt.c

@@ -36,7 +36,7 @@ int main()
     flint_randinit(state);
 
     /* check (a^(1/2))^2 = a */
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c;
         slong prec;

acb/test/t-tan.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t x, y, a, b, c, d;
         slong prec1, prec2;

acb/test/t-tan_pi.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t x, y, a, b, c;
         slong prec1, prec2;

acb/test/t-tanh.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t x, y, a, b, c, d;
         slong prec1, prec2;

acb/test/t-zeta.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 3000; iter++)
+    for (iter = 0; iter < 3000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c;
         slong prec1, prec2;

acb_calc/test/t-cauchy_bound.c

@@ -56,7 +56,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 100; iter++)
+    for (iter = 0; iter < 100 * arb_test_multiplier(); iter++)
     {
         arb_t b, radius, ans;
         acb_t x;

acb_calc/test/t-integrate_taylor.c

@@ -49,7 +49,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 150; iter++)
+    for (iter = 0; iter < 150 * arb_test_multiplier(); iter++)
     {
         acb_t ans, res, a, b;
         arf_t inr, outr;

acb_dirichlet/test/t-chi.c

@@ -34,7 +34,7 @@ int main()
     fflush(stdout);
     flint_randinit(state);
 
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t zn1, zn2, zn1n2, zn1zn2;
         acb_dirichlet_group_t G;

acb_dirichlet/test/t-euler_product_real_ui.c

@@ -56,7 +56,7 @@ int main()
     fflush(stdout);
     flint_randinit(state);
 
-    for (iter = 0; iter < 3000; iter++)
+    for (iter = 0; iter < 3000 * arb_test_multiplier(); iter++)
     {
         arb_t res1, res2;
         ulong s;

acb_hypgeom/test/t-0f1.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 2000; iter++)
+    for (iter = 0; iter < 2000 * arb_test_multiplier(); iter++)
     {
         acb_t a, z, w1, w2;
         slong prec1, prec2;

acb_hypgeom/test/t-2f1.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 3000; iter++)
+    for (iter = 0; iter < 3000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c, z, w1, w2, t;
         slong prec1, prec2;

acb_hypgeom/test/t-2f1_continuation.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c, z1, z2, f1, f2, g1, g2, h1, h2, aa, bb, cc;
         mag_t d0, d1, dt;

acb_hypgeom/test/t-airy.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t z, t, w;
         acb_t ai1, aip1, bi1, bip1;

acb_hypgeom/test/t-airy_bound.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t ai, aip, bi, bip, z1, z2;
         slong prec;

acb_hypgeom/test/t-airy_series.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_poly_t ai, aip, bi, bip, ai2, aip2, bi2, bip2, z, w, t;
         acb_t c;

acb_hypgeom/test/t-bessel_i.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 2000; iter++)
+    for (iter = 0; iter < 2000 * arb_test_multiplier(); iter++)
     {
         acb_t nu, z, jv, iv, t;
         slong prec;
@@ -88,7 +88,7 @@ int main()
         acb_clear(t);
     }
 
-    for (iter = 0; iter < 2000; iter++)
+    for (iter = 0; iter < 2000 * arb_test_multiplier(); iter++)
     {
         acb_t nu0, nu1, nu2, z, w0, w1, w2, t, u;
         slong prec0, prec1, prec2;

acb_hypgeom/test/t-bessel_j.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 2000; iter++)
+    for (iter = 0; iter < 2000 * arb_test_multiplier(); iter++)
     {
         acb_t nu0, nu1, nu2, z, w0, w1, w2, t, u;
         slong prec0, prec1, prec2;

acb_hypgeom/test/t-bessel_k.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 2000; iter++)
+    for (iter = 0; iter < 2000 * arb_test_multiplier(); iter++)
     {
         acb_t nu0, nu1, nu2, z, w0, w1, w2, t, u;
         slong prec0, prec1, prec2;

acb_hypgeom/test/t-bessel_y.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 2000; iter++)
+    for (iter = 0; iter < 2000 * arb_test_multiplier(); iter++)
     {
         acb_t nu, nu1, z, jv, jv1, yv, yv1, r, s;
         slong prec, n;

acb_hypgeom/test/t-chebyshev_t.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 2000; iter++)
+    for (iter = 0; iter < 2000 * arb_test_multiplier(); iter++)
     {
         acb_t n, z, a, b, c, t, res1, res2;
         slong prec;

acb_hypgeom/test/t-chebyshev_u.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 2000; iter++)
+    for (iter = 0; iter < 2000 * arb_test_multiplier(); iter++)
     {
         acb_t n, z, a, b, c, t, res1, res2;
         slong prec;

acb_hypgeom/test/t-chi.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t z0, z1, w0, w1;
         slong prec0, prec1;

acb_hypgeom/test/t-chi_series.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 200; iter++)
+    for (iter = 0; iter < 200 * arb_test_multiplier(); iter++)
     {
         slong m, n1, n2, n3, bits1, bits2, bits3;
         acb_poly_t S, A, B, C, T, U;

acb_hypgeom/test/t-ci.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t z0, z1, w0, w1;
         slong prec0, prec1;

acb_hypgeom/test/t-ci_series.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 200; iter++)
+    for (iter = 0; iter < 200 * arb_test_multiplier(); iter++)
     {
         slong m, n1, n2, n3, bits1, bits2, bits3;
         acb_poly_t S, A, B, C, T, U;

acb_hypgeom/test/t-ei.c

@@ -67,7 +67,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 3000; iter++)
+    for (iter = 0; iter < 3000 * arb_test_multiplier(); iter++)
     {
         acb_t z0, z1, w0, w1;
         slong prec0, prec1;

acb_hypgeom/test/t-ei_series.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 200; iter++)
+    for (iter = 0; iter < 200 * arb_test_multiplier(); iter++)
     {
         slong m, n1, n2, n3, bits1, bits2, bits3;
         acb_poly_t S, A, B, C, T, U;

acb_hypgeom/test/t-erf.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c;
         slong prec1, prec2, prec3, prec4;

acb_hypgeom/test/t-erf_series.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 200; iter++)
+    for (iter = 0; iter < 200 * arb_test_multiplier(); iter++)
     {
         slong m, n1, n2, bits1, bits2, bits3;
         acb_poly_t S, A, B, C;

acb_hypgeom/test/t-erfc.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t a, b, c;
         slong prec1, prec2, prec3, prec4;

acb_hypgeom/test/t-erfc_series.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 200; iter++)
+    for (iter = 0; iter < 200 * arb_test_multiplier(); iter++)
     {
         slong m, n1, n2, bits1, bits2, bits3;
         acb_poly_t S, A, B, C;

acb_hypgeom/test/t-erfi_series.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 200; iter++)
+    for (iter = 0; iter < 200 * arb_test_multiplier(); iter++)
     {
         slong m, n1, n2, bits1, bits2, bits3;
         acb_poly_t S, A, B, C;

acb_hypgeom/test/t-fresnel.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t z, z2, s, c, u, v;
         slong prec1, prec2;

acb_hypgeom/test/t-fresnel_series.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 500; iter++)
+    for (iter = 0; iter < 500 * arb_test_multiplier(); iter++)
     {
         slong m, n1, n2, bits1, bits2, bits3;
         acb_poly_t X, S1, S2, C1, C2, T;

acb_hypgeom/test/t-gamma_upper.c

@@ -36,7 +36,7 @@ int main()
     flint_randinit(state);
 
     /* special accuracy test -- see nemo #38 */
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t a, z, res;
         slong prec, goal;
@@ -79,7 +79,7 @@ int main()
         acb_clear(res);
     }
 
-    for (iter = 0; iter < 2000; iter++)
+    for (iter = 0; iter < 2000 * arb_test_multiplier(); iter++)
     {
         acb_t a0, a1, b, z, w0, w1, t, u;
         slong prec0, prec1;

acb_hypgeom/test/t-gegenbauer_c.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t n, m, z, t, u, res1, res2;
         slong prec1, prec2;

acb_hypgeom/test/t-hermite_h.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t n, n1, n2, z, res1, res2, res3, s;
         slong prec1, prec2, prec3;

acb_hypgeom/test/t-jacobi_p.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t n, a, b, n1, a1, b1, z, res1, res2, res3, s;
         slong prec;

acb_hypgeom/test/t-laguerre_l.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 2000; iter++)
+    for (iter = 0; iter < 2000 * arb_test_multiplier(); iter++)
     {
         acb_t n, m, n1, m1, z, res1, res2, res3, s;
         slong prec;

acb_hypgeom/test/t-legendre_p.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 2000; iter++)
+    for (iter = 0; iter < 2000 * arb_test_multiplier(); iter++)
     {
         acb_t n, na, nb, m, z, res1, res2, res3, t, u;
         slong prec1, prec2, ebits;

acb_hypgeom/test/t-legendre_q.c

@@ -41,7 +41,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_t n, m, z, res1, res2;
         slong prec1, prec2, ebits;
@@ -91,7 +91,7 @@ int main()
         acb_clear(res2);
     }
 
-    for (iter = 0; iter < 2000; iter++)
+    for (iter = 0; iter < 2000 * arb_test_multiplier(); iter++)
     {
         acb_t n, m, z, res1, res2, t, u;
         slong prec1, prec2, ebits;

acb_hypgeom/test/t-li_series.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 200; iter++)
+    for (iter = 0; iter < 200 * arb_test_multiplier(); iter++)
     {
         slong m, n1, n2, n3, bits1, bits2, bits3;
         acb_poly_t S, A, B, C, T, U;

acb_hypgeom/test/t-m.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 2000; iter++)
+    for (iter = 0; iter < 2000 * arb_test_multiplier(); iter++)
     {
         acb_t a0, a1, a2, b, z, w0, w1, w2, t, u;
         slong prec0, prec1, prec2;

acb_hypgeom/test/t-pfq.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_ptr a, b;
         acb_t z, t, res1, res2;

acb_hypgeom/test/t-pfq_series_direct.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 1000; iter++)
+    for (iter = 0; iter < 1000 * arb_test_multiplier(); iter++)
     {
         acb_poly_struct a[4], b[4];
         acb_poly_t z, s1, s2;

acb_hypgeom/test/t-pfq_sum_bs.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_ptr a, b;
         acb_t z, s1, s2, t1, t2;

acb_hypgeom/test/t-pfq_sum_fme.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 5000; iter++)
+    for (iter = 0; iter < 5000 * arb_test_multiplier(); iter++)
     {
         acb_ptr a, b;
         acb_t z, s1, s2, t1, t2;

acb_hypgeom/test/t-pfq_sum_invz.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 2000; iter++)
+    for (iter = 0; iter < 2000 * arb_test_multiplier(); iter++)
     {
         acb_ptr a, b;
         acb_t z, zinv, s1, s2, t1, t2;

acb_hypgeom/test/t-pfq_sum_rs.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_ptr a, b;
         acb_t z, s1, s2, t1, t2;

acb_hypgeom/test/t-shi_series.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 200; iter++)
+    for (iter = 0; iter < 200 * arb_test_multiplier(); iter++)
     {
         slong m, n1, n2, n3, bits1, bits2, bits3;
         acb_poly_t S, A, B, C, T, U;

acb_hypgeom/test/t-si.c

@@ -35,7 +35,7 @@ int main()
 
     flint_randinit(state);
 
-    for (iter = 0; iter < 10000; iter++)
+    for (iter = 0; iter < 10000 * arb_test_multiplier(); iter++)
     {
         acb_t z0, z1, w0, w1;
         slong prec0, prec1;