aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMohammad S Anwar <Mohammad.Anwar@yahoo.com>2020-07-06 21:31:33 +0100
committerGitHub <noreply@github.com>2020-07-06 21:31:33 +0100
commit0486402dfb99dc3b6d940989cbe83b3ae0153b8b (patch)
treed8bbf0bfc7ecb25b147800526090035b003ce2fe
parent2cd5c6d76f5516d569b0a7b0d9ade83a89318619 (diff)
parent9c2803fecbae38c4eb9859b2273168c7b09370ba (diff)
downloadperlweeklychallenge-club-0486402dfb99dc3b6d940989cbe83b3ae0153b8b.tar.gz
perlweeklychallenge-club-0486402dfb99dc3b6d940989cbe83b3ae0153b8b.tar.bz2
perlweeklychallenge-club-0486402dfb99dc3b6d940989cbe83b3ae0153b8b.zip
Merge pull request #1915 from andemark/branch-for-challenge-068
Challenge 68 Solution 1
-rw-r--r--challenge-068/mark-anderson/raku/ch-1.raku4
1 files changed, 2 insertions, 2 deletions
diff --git a/challenge-068/mark-anderson/raku/ch-1.raku b/challenge-068/mark-anderson/raku/ch-1.raku
index d42319fc1d..c14f93fe2a 100644
--- a/challenge-068/mark-anderson/raku/ch-1.raku
+++ b/challenge-068/mark-anderson/raku/ch-1.raku
@@ -21,7 +21,7 @@ my @matrix = [1, 1, 1, 1, 1, 1, 1, 1, 1],
my $rows = @matrix.elems;
my $cols = @matrix[0].elems;
-my @zeroes = gather {
+my @zeros = gather {
for ^$rows -> $r {
for ^$cols -> $c {
take [$r, $c] if @matrix[$r][$c] == 0;
@@ -32,7 +32,7 @@ my @zeroes = gather {
my %seen_row;
my %seen_col;
-for @zeroes -> $p {
+for @zeros -> $p {
unless %seen_row{$p[0]} {
@matrix[$p[0]] = [0 xx $cols];
%seen_row{$p[0]} = True;