This is an automated email from the git hooks/post-receive script.
ppm-guest pushed a commit to annotated tag v0.21
in repository libmath-prime-util-perl.
commit 0862ac9dbeac2213454fe5d6ab9c27858eb13202
Author: Dana Jacobsen <d...@acm.org>
Date: Thu Feb 21 01:00:53 2013 -0800
New M-R bases
---
factor.c | 12 ++++++------
1 file changed, 6 insertions(+), 6 deletions(-)
diff --git a/factor.c b/factor.c
index 7602b2c..5396f78 100644
--- a/factor.c
+++ b/factor.c
@@ -208,13 +208,13 @@ int _XS_is_prob_prime(UV n)
}
#else
#if 1
- /* Better bases from http://miller-rabin.appspot.com/, 30 Jan 2013 */
- if (n < UVCONST(272161)) {
- bases[0] = UVCONST(62769592775616394);
+ /* Better bases from http://miller-rabin.appspot.com/, 8 Feb 2013 */
+ if (n < UVCONST(291831)) {
+ bases[0] = UVCONST(126401071349994536);
nbases = 1;
- } else if (n < UVCONST(466758181)) {
- bases[0] = UVCONST( 91869414 );
- bases[1] = UVCONST( 6346128598129234 );
+ } else if (n < UVCONST(520924141)) {
+ bases[0] = UVCONST( 15 );
+ bases[1] = UVCONST( 750068417525532 );
nbases = 2;
} else if (n < UVCONST(109134866497)) {
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
_______________________________________________
Pkg-perl-cvs-commits mailing list
Pkg-perl-cvs-commits@lists.alioth.debian.org
http://lists.alioth.debian.org/cgi-bin/mailman/listinfo/pkg-perl-cvs-commits
