diff options
| -rw-r--r-- | challenge-128/mark-anderson/raku/ch-1.raku | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/challenge-128/mark-anderson/raku/ch-1.raku b/challenge-128/mark-anderson/raku/ch-1.raku index 140e794159..a835041e50 100644 --- a/challenge-128/mark-anderson/raku/ch-1.raku +++ b/challenge-128/mark-anderson/raku/ch-1.raku @@ -66,8 +66,8 @@ sub max-sub-matrix(+@matrix) for (^@matrix).combinations: 2 -> ($first-row, $last-row) { my @cols = ([(&)] @zero-indices[$first-row .. $last-row]).keys - .sort - .Array; + .sort; + next unless @cols > 1; my $rows = $last-row - $first-row + 1; |