diff options
| author | Mohammad S Anwar <mohammad.anwar@yahoo.com> | 2020-07-12 18:11:32 +0100 |
|---|---|---|
| committer | Mohammad S Anwar <mohammad.anwar@yahoo.com> | 2020-07-12 18:11:32 +0100 |
| commit | c266eeb66e3301949de4a97079b4203bd2170aed (patch) | |
| tree | 20f36eca0f8c5a01f472561e0b1120779ebad735 /challenge-068 | |
| parent | 55c79c93617c85a587d151866b8ef76107168c77 (diff) | |
| download | perlweeklychallenge-club-c266eeb66e3301949de4a97079b4203bd2170aed.tar.gz perlweeklychallenge-club-c266eeb66e3301949de4a97079b4203bd2170aed.tar.bz2 perlweeklychallenge-club-c266eeb66e3301949de4a97079b4203bd2170aed.zip | |
- Tidied up Raku solution.
Diffstat (limited to 'challenge-068')
| -rw-r--r-- | challenge-068/mohammad-anwar/raku/ch-1a.raku | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/challenge-068/mohammad-anwar/raku/ch-1a.raku b/challenge-068/mohammad-anwar/raku/ch-1a.raku index b26981df76..5737f63e0e 100644 --- a/challenge-068/mohammad-anwar/raku/ch-1a.raku +++ b/challenge-068/mohammad-anwar/raku/ch-1a.raku @@ -41,8 +41,8 @@ sub make-zero-matrix($matrix) { } # fill empty cells, if any. - for (0..$rows) -> $r { - for (0..$cols) -> $c { + for 0..$rows -> $r { + for 0..$cols -> $c { $zero_matrix.[$r][$c] = 1 unless defined $zero_matrix.[$r][$c]; } |