Skip to content
Browse files

[euler] more int() removal

  • Loading branch information...
1 parent 34a0c55 commit e0c229c95ad26885282ae5d968d49acb64746d8d @moritz moritz committed Dec 8, 2009
Showing with 2 additions and 2 deletions.
  1. +1 −1 euler/prob052-duff.pl
  2. +1 −1 euler/prob063-polettix.pl
View
2 euler/prob052-duff.pl
@@ -13,7 +13,7 @@
$s eq (5*$n).comb.sort &&
$s eq (6*$n).comb.sort;
$n++;
- if log10(6*$n).int > log10(2*$n).int {
+ if log10(6*$n).Int > log10(2*$n).Int {
$mag *= 10;
$n = $mag;
}
View
2 euler/prob063-polettix.pl
@@ -60,7 +60,7 @@ (@x is copy, $y)
my $rest = 0;
for @x -> $x is rw{
$x = $x * $y + $rest;
- $rest = int($x / $limit);
+ $rest = $x div $limit;
$x %= $limit;
}
push @x, $rest if $rest;

0 comments on commit e0c229c

Please sign in to comment.
Something went wrong with that request. Please try again.