diff options
Diffstat (limited to 'challenge-059')
| -rw-r--r-- | challenge-059/mark-anderson/raku/ch-2.p6 | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/challenge-059/mark-anderson/raku/ch-2.p6 b/challenge-059/mark-anderson/raku/ch-2.p6 index 6256e2aa69..632161f883 100644 --- a/challenge-059/mark-anderson/raku/ch-2.p6 +++ b/challenge-059/mark-anderson/raku/ch-2.p6 @@ -5,11 +5,11 @@ my @list = (2, 3, 4); my $sum; for @list.combinations(2) -> ($n1, $n2) { - $sum += f($n1, $n2); + $sum += f($n1, $n2); } say $sum; sub f ($n1, $n2) { - ($n1 +^ $n2).fmt("%0b").comb("1").elems; + ($n1 +^ $n2).fmt("%b").comb("1").elems; } |