[euler] more int() removal

Raku · Dec 8, 2009 · e0c229c · e0c229c
1 parent 34a0c55
commit e0c229c
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 2 deletions.
diff --git a/euler/prob052-duff.pl b/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;
     }

diff --git a/euler/prob063-polettix.pl b/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;