fix acb_dirichlet_dft test -- the reference was wrong

This commit is contained in:
Pascal 2017-10-04 15:46:45 +02:00
parent fee1379331
commit 842e334367
3 changed files with 3 additions and 5 deletions

View file

@ -56,8 +56,8 @@ int main()
slong k;
slong prec = 100, digits = 30;
slong nq = 13;
ulong q[13] = { 2, 3, 4, 5, 6, 23, 10, 15, 30, 59, 308, 335, 961};
slong nq = 14;
ulong q[14] = { 2, 3, 4, 5, 6, 23, 10, 15, 30, 59, 308, 335, 525, 961};
flint_rand_t state;
slong f, nf = 4;

View file

@ -58,4 +58,3 @@ acb_dirichlet_dft(acb_ptr w, acb_srcptr v, const dirichlet_group_t G, slong prec
dirichlet_char_clear(x);
flint_free(t1);
}

View file

@ -81,7 +81,7 @@ int main()
w1 = _acb_vec_init(len);
w2 = _acb_vec_init(len);
acb_init(chiy);
acb_dirichlet_roots_init(roots, len, len, prec);
acb_dirichlet_roots_init(roots, G->expo, len, prec);
dirichlet_char_init(x, G);
dirichlet_char_init(y, G);
@ -126,4 +126,3 @@ int main()
flint_printf("PASS\n");
return EXIT_SUCCESS;
}