[libmath-prime-util-perl] 14/16: Update M-R bases

Partha P. Mukherjee ppm-guest at moszumanska.debian.org
Thu May 21 18:46:52 UTC 2015


This is an automated email from the git hooks/post-receive script.

ppm-guest pushed a commit to annotated tag v0.19
in repository libmath-prime-util-perl.

commit 590d5642651c51d4610c7fa2ae218f70d5113c08
Author: Dana Jacobsen <dana at acm.org>
Date:   Thu Jan 31 00:47:13 2013 -0800

    Update M-R bases
---
 factor.c | 28 ++++++++++++++--------------
 1 file changed, 14 insertions(+), 14 deletions(-)

diff --git a/factor.c b/factor.c
index 59c246b..7602b2c 100644
--- a/factor.c
+++ b/factor.c
@@ -208,31 +208,31 @@ int _XS_is_prob_prime(UV n)
   }
 #else
 #if 1
-  /* Better bases from http://miller-rabin.appspot.com/, 23 Jan 2013 */
+  /* Better bases from http://miller-rabin.appspot.com/, 30 Jan 2013 */
   if (n < UVCONST(272161)) {
     bases[0] = UVCONST(62769592775616394);
     nbases = 1;
   } else if (n < UVCONST(466758181)) {
-    bases[0] = UVCONST( 91869414    );
+    bases[0] = UVCONST( 91869414   );
     bases[1] = UVCONST( 6346128598129234 );
     nbases = 2;
-  } else if (n < UVCONST(105936894253)) {
+  } else if (n < UVCONST(109134866497)) {
     bases[0] = 2;
-    bases[1] = UVCONST( 1005905886 );
-    bases[2] = UVCONST( 1340600841 );
+    bases[1] = UVCONST( 45650740   );
+    bases[2] = UVCONST( 3722628058 );
     nbases = 3;
-  } else if (n < UVCONST(31858317218647)) {
+  } else if (n < UVCONST(47636622961201)) {
     bases[0] = 2;
-    bases[1] = UVCONST( 642735     );
-    bases[2] = UVCONST( 553174392  );
-    bases[3] = UVCONST( 3046413974 );
+    bases[1] = UVCONST( 2570940    );
+    bases[2] = UVCONST( 211991001  );
+    bases[3] = UVCONST( 3749873356 );
     nbases = 4;
-  } else if (n < UVCONST(3071837692357849)) {
+  } else if (n < UVCONST(3770579582154547)) {
     bases[0] = 2;
-    bases[1] = UVCONST( 75088      );
-    bases[2] = UVCONST( 642735     );
-    bases[3] = UVCONST( 203659041  );
-    bases[4] = UVCONST( 3613982119 );
+    bases[1] = UVCONST( 2570940    );
+    bases[2] = UVCONST( 880937     );
+    bases[3] = UVCONST( 610386380  );
+    bases[4] = UVCONST( 4130785767 );
     nbases = 5;
   } else {
     bases[0] = 2;

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libmath-prime-util-perl.git



More information about the Pkg-perl-cvs-commits mailing list