[libmath-prime-util-perl] 14/181: Remove trailing white space

[Partha P. Mukherjee]

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

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

commit 53ae236b8d93664f59a05c9b964f95ca5d89693a
Author: Dana Jacobsen <dana at acm.org>
Date:   Sun Dec 15 20:32:19 2013 -0800

    Remove trailing white space
---
 factor.c                            | 2 +-
 lib/Math/Prime/Util/ZetaBigFloat.pm | 4 ++--
 xt/factor-holf.pl                   | 2 +-
 xt/primality-proofs.pl              | 2 +-
 xt/primes-edgecases.pl              | 2 +-
 5 files changed, 6 insertions(+), 6 deletions(-)

diff --git a/factor.c b/factor.c
index 3ca3579..a425a38 100644
--- a/factor.c
+++ b/factor.c
@@ -784,7 +784,7 @@ int squfof_factor(UV n, UV *factors, UV rounds)
 
   qlast = r;
   p = p + r*((s - p)/r);
-  q = (n - (p*p)) / qlast;			/* q = (n - p*p)/qlast (div is exact)*/
+  q = (n - (p*p)) / qlast;               /* q = (n - p*p)/qlast (div is exact)*/
   for (iter=0; iter<rounds2; iter++) {   /* unrolled second main loop */
     iq = (s + p)/q;
     pnext = iq*q - p;
diff --git a/lib/Math/Prime/Util/ZetaBigFloat.pm b/lib/Math/Prime/Util/ZetaBigFloat.pm
index d83b694..fbadc24 100644
--- a/lib/Math/Prime/Util/ZetaBigFloat.pm
+++ b/lib/Math/Prime/Util/ZetaBigFloat.pm
@@ -273,8 +273,8 @@ sub _Recompute_Dk {
     my $gcd;
     foreach my $i (0 .. $k) {
       # ad + cb  /  bd
-      $sum_n->bmul($d)->badd( $sum_d->copy->bmul($n) );   
-      $sum_d->bmul($d);                                   
+      $sum_n->bmul($d)->badd( $sum_d->copy->bmul($n) );
+      $sum_d->bmul($d);
       $gcd = Math::BigInt::bgcd($sum_n, $sum_d);
       do { $sum_n /= $gcd;  $sum_d /= $gcd; } unless $gcd->is_one;
       my $dmul = (2*$i+1) * (2*$i+2);
diff --git a/xt/factor-holf.pl b/xt/factor-holf.pl
index b1b0f32..219f590 100755
--- a/xt/factor-holf.pl
+++ b/xt/factor-holf.pl
@@ -14,7 +14,7 @@ for (2 .. 100000000) {
 
   my @p_holf;
   push @fs, $_;
-  while (@fs) { 
+  while (@fs) {
     my $n = pop @fs;
     if (is_prime($n)) { push @p_holf, $n; }
     else              { push @fs, Math::Prime::Util::holf_factor($n); }
diff --git a/xt/primality-proofs.pl b/xt/primality-proofs.pl
index cfaaf41..a1f081f 100755
--- a/xt/primality-proofs.pl
+++ b/xt/primality-proofs.pl
@@ -47,7 +47,7 @@ sub test_proofs {
     my $bits = int(rand($size-$minsize)) + $minsize;
     my $n;
     if      ($prime_method eq 'cpmaurer') {
-      $n = Crypt::Primes::maurer(Size=>$bits); 
+      $n = Crypt::Primes::maurer(Size=>$bits);
     } elsif ($prime_method eq 'pari') {
       # This is ~4x faster, has awful distribution.  Still much slower than MPU.
       # $n = Math::Pari::nextprime( ...makerandom... );
diff --git a/xt/primes-edgecases.pl b/xt/primes-edgecases.pl
index b0d340c..36915f8 100755
--- a/xt/primes-edgecases.pl
+++ b/xt/primes-edgecases.pl
@@ -35,7 +35,7 @@ SKIP: {
 my @lprimes = (~0 > 4294967295)
  ? (qw/18446744073709550671 18446744073709550681 18446744073709550717 18446744073709550719 18446744073709550771 18446744073709550773 18446744073709550791 18446744073709550873 18446744073709551113 18446744073709551163 18446744073709551191 18446744073709551253 18446744073709551263 18446744073709551293 18446744073709551337 18446744073709551359 18446744073709551427 18446744073709551437 18446744073709551521 18446744073709551533 18446744073709551557/)
  : (qw/4294966297 4294966337 4294966367 4294966373 4294966427 4294966441 4294966447 4294966477 4294966553 4294966583 4294966591 4294966619 4294966639 4294966651 4294966657 4294966661 4294966667 4294966769 4294966813 4294966829 4294966877 4294966909 4294966927 4294966943 4294966981 4294966997 4294967029 4294967087 4294967111 4294967143 4294967161 4294967189 4294967197 4294967231 4294967279 4294967291/);
- 
+
 diag "\nChecking numbers near end with iterator\n";
 foreach my $bdelta (reverse 0 .. 100) {
   foreach my $edelta (reverse 0 .. $bdelta) {

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