[libmath-prime-util-perl] 05/35: Fix tests for all_factor, add liouville stopword

[Partha P. Mukherjee]

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

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

commit 08869157bfa5bc72ac715f5344548d57a50330c2
Author: Dana Jacobsen <dana at acm.org>
Date:   Fri Oct 18 21:42:40 2013 -0700

    Fix tests for all_factor, add liouville stopword
---
 lib/Math/Prime/Util.pm |  2 +-
 t/50-factoring.t       | 40 ++++++++++++++++++++--------------------
 t/81-bignum.t          |  2 +-
 3 files changed, 22 insertions(+), 22 deletions(-)

diff --git a/lib/Math/Prime/Util.pm b/lib/Math/Prime/Util.pm
index b7a4841..8d128a3 100644
--- a/lib/Math/Prime/Util.pm
+++ b/lib/Math/Prime/Util.pm
@@ -2613,7 +2613,7 @@ __END__
 
 =encoding utf8
 
-=for stopwords forprimes Möbius Deléglise totient moebius mertens znorder irand primesieve uniqued k-tuples von SoE pari yafu fonction qui compte le nombre nombres voor PhD superset sqrt(N) gcd(A^M k-th (10001st primegen libtommath
+=for stopwords forprimes Möbius Deléglise totient moebius mertens liouville znorder irand primesieve uniqued k-tuples von SoE pari yafu fonction qui compte le nombre nombres voor PhD superset sqrt(N) gcd(A^M k-th (10001st primegen libtommath
 
 
 =head1 NAME
diff --git a/t/50-factoring.t b/t/50-factoring.t
index 042975b..1eec553 100644
--- a/t/50-factoring.t
+++ b/t/50-factoring.t
@@ -51,26 +51,26 @@ push @testn, qw/9999986200004761 99999989237606677 999999866000004473/
       if $use64 && $extra;
 
 my %all_factors = (
-1234567890 => [2,3,5,6,9,10,15,18,30,45,90,3607,3803,7214,7606,10821,11409,18035,19015,21642,22818,32463,34227,36070,38030,54105,57045,64926,68454,108210,114090,162315,171135,324630,342270,13717421,27434842,41152263,68587105,82304526,123456789,137174210,205761315,246913578,411522630,617283945],
-1032924637 => [6469,159673],
-4567890 => [2,3,5,6,10,15,30,43,86,129,215,258,430,645,1290,3541,7082,10623,17705,21246,35410,53115,106230,152263,304526,456789,761315,913578,1522630,2283945],
- 456789 => [3,43,129,3541,10623,152263],
- 123456 => [2,3,4,6,8,12,16,24,32,48,64,96,192,643,1286,1929,2572,3858,5144,7716,10288,15432,20576,30864,41152,61728],
- 115553 => [],
-  30107 => [7,11,17,23,77,119,161,187,253,391,1309,1771,2737,4301],
-     42 => [2,3,6,7,14,21],
-     16 => [2,4,8],
-     12 => [2,3,4,6],
-     10 => [2,5],
-      9 => [3],
-      8 => [2,4],
-      7 => [],
-      6 => [2,3],
-      5 => [],
-      4 => [2],
-      3 => [],
-      2 => [],
-      1 => [],
+1234567890 => [1,2,3,5,6,9,10,15,18,30,45,90,3607,3803,7214,7606,10821,11409,18035,19015,21642,22818,32463,34227,36070,38030,54105,57045,64926,68454,108210,114090,162315,171135,324630,342270,13717421,27434842,41152263,68587105,82304526,123456789,137174210,205761315,246913578,411522630,617283945,1234567890],
+1032924637 => [1,6469,159673,1032924637],
+4567890 => [1,2,3,5,6,10,15,30,43,86,129,215,258,430,645,1290,3541,7082,10623,17705,21246,35410,53115,106230,152263,304526,456789,761315,913578,1522630,2283945,4567890],
+ 456789 => [1,3,43,129,3541,10623,152263,456789],
+ 123456 => [1,2,3,4,6,8,12,16,24,32,48,64,96,192,643,1286,1929,2572,3858,5144,7716,10288,15432,20576,30864,41152,61728,123456],
+ 115553 => [1,115553],
+  30107 => [1,7,11,17,23,77,119,161,187,253,391,1309,1771,2737,4301,30107],
+     42 => [1,2,3,6,7,14,21,42],
+     16 => [1,2,4,8,16],
+     12 => [1,2,3,4,6,12],
+     10 => [1,2,5,10],
+      9 => [1,3,9],
+      8 => [1,2,4,8],
+      7 => [1,7],
+      6 => [1,2,3,6],
+      5 => [1,5],
+      4 => [1,2,4],
+      3 => [1,3],
+      2 => [1,2],
+      1 => [1],
       0 => [],
 );
 
diff --git a/t/81-bignum.t b/t/81-bignum.t
index edca71c..2068ac6 100644
--- a/t/81-bignum.t
+++ b/t/81-bignum.t
@@ -62,7 +62,7 @@ my %factors = (
 
 my %allfactors = (
   #'7674353466844111807691499613711' => [qw/11783 12239 18869 22277 37861 55163 60617 144212137 222333427 230937691 262489891 272648203 420344713 446116163 463380779 649985629 675139957 714250111 714399209 741891463 843429497 1040870647 1143782173 1228866151 1350364909 2088526343 2295020237 3343815571 2721138813053 3212613775949 4952921753279 5144598942407 5460015718957 7955174113331 8417765879647 8741707108529 8743531918951 9938129763151 10322733613783 12264578833601 12739215848633 1347 [...]
-  '23489223467134234890234680' => [qw/2 4 5 8 10 20 40 4073 4283 8146 8566 16292 17132 20365 21415 32584 34264 40730 42830 81460 85660 162920 171320 17444659 34889318 69778636 87223295 139557272 174446590 348893180 697786360 33662485846146713 67324971692293426 134649943384586852 168312429230733565 269299886769173704 336624858461467130 673249716922934260 1346499433845868520 137107304851355562049 144176426879046371779 274214609702711124098 288352853758092743558 548429219405422248196 576705 [...]
+  '23489223467134234890234680' => [qw/1 2 4 5 8 10 20 40 4073 4283 8146 8566 16292 17132 20365 21415 32584 34264 40730 42830 81460 85660 162920 171320 17444659 34889318 69778636 87223295 139557272 174446590 348893180 697786360 33662485846146713 67324971692293426 134649943384586852 168312429230733565 269299886769173704 336624858461467130 673249716922934260 1346499433845868520 137107304851355562049 144176426879046371779 274214609702711124098 288352853758092743558 548429219405422248196 5767 [...]
 );
 
 plan tests =>  0

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