Merge all_notransform into jet_notransform

flintlib · Feb 10, 2025 · 5d6c6ba · 5d6c6ba
1 parent 0171547
commit 5d6c6ba
Show file tree

Hide file tree

Showing 6 changed files with 4 additions and 159 deletions.
diff --git a/src/acb_theta.h b/src/acb_theta.h
@@ -199,8 +199,6 @@ void acb_theta_ql_jet(acb_ptr th, acb_srcptr zs, slong nb,
 
 void acb_theta_jet_notransform(acb_ptr th, acb_srcptr zs, slong nb,
     const acb_mat_t tau, slong ord, ulong ab, int all, int sqr, slong prec);
-void acb_theta_all_notransform(acb_ptr th, acb_srcptr zs, slong nb,
-    const acb_mat_t tau, int sqr, slong prec);
 
 int acb_theta_reduce_tau(acb_ptr new_zs, acb_mat_t new_tau, fmpz_mat_t mat, acb_mat_t N,
     acb_mat_t ct, acb_ptr exps, acb_srcptr zs, slong nb, const acb_mat_t tau, slong prec);

diff --git a/src/acb_theta/all.c b/src/acb_theta/all.c
@@ -72,7 +72,7 @@ acb_theta_all(acb_ptr th, acb_srcptr zs, slong nb, const acb_mat_t tau,
             kappa = acb_siegel_kappa(s, mat, new_tau, prec);
         }
 
-        acb_theta_all_notransform(aux, new_zs, nb, new_tau, sqr, prec);
+        acb_theta_jet_notransform(aux, new_zs, nb, new_tau, 0, 0, 1, sqr, prec);
 
         /* Account for reduce_z */
         for (j = 0; j < nb; j++)

diff --git a/src/acb_theta/all_notransform.c b/src/acb_theta/all_notransform.c
diff --git a/src/acb_theta/test/main.c b/src/acb_theta/test/main.c
@@ -16,7 +16,6 @@
 #include "t-agm_mul_tight.c"
 #include "t-agm_sqrt.c"
 #include "t-all.c"
-#include "t-all_notransform.c"
 #include "t-char_dot.c"
 #include "t-char_is_even.c"
 #include "t-char_is_goepel.c"
@@ -81,7 +80,6 @@ test_struct tests[] =
     TEST_FUNCTION(acb_theta_agm_mul_tight),
     TEST_FUNCTION(acb_theta_agm_sqrt),
     TEST_FUNCTION(acb_theta_all),
-    TEST_FUNCTION(acb_theta_all_notransform),
     TEST_FUNCTION(acb_theta_char_dot),
     TEST_FUNCTION(acb_theta_char_is_even),
     TEST_FUNCTION(acb_theta_char_is_goepel),

diff --git a/src/acb_theta/test/t-all.c b/src/acb_theta/test/t-all.c
@@ -17,7 +17,7 @@ TEST_FUNCTION_START(acb_theta_all, state)
 {
     slong iter;
 
-    /* Test: agrees with all_notransform */
+    /* Test: agrees with jet_notransform */
     for (iter = 0; iter < 20 * flint_test_multiplier(); iter++)
     {
         slong g = 1 + n_randint(state, 2);
@@ -41,9 +41,9 @@ TEST_FUNCTION_START(acb_theta_all, state)
         acb_mat_scalar_mul_2exp_si(tau, tau, -1);
         acb_siegel_randtest_vec_reduced(z, state, nb, tau, 0, prec);
 
-        /* Call theta_all at precision mprec, test against all_notransform */
+        /* Call theta_all at precision mprec, test against jet_notransform */
         acb_theta_all(th, z, nb, tau, sqr, mprec);
-        acb_theta_all_notransform(test, z, nb, tau, sqr, prec);
+        acb_theta_jet_notransform(test, z, nb, tau, 0, 0, 1, sqr, prec);
 
         if (!_acb_vec_overlaps(th, test, nb * n2))
         {

diff --git a/src/acb_theta/test/t-all_notransform.c b/src/acb_theta/test/t-all_notransform.c