aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMark <53903062+andemark@users.noreply.github.com>2023-04-26 11:39:28 +0000
committerMark <53903062+andemark@users.noreply.github.com>2023-04-26 11:39:28 +0000
commite9d0323937129330c7cd9b49c827a96a05ff9892 (patch)
treee304c2e6b3fdceb247635e504219211d9be9548e
parent088c13928eb9de940b85234ed243f1e152df17c6 (diff)
downloadperlweeklychallenge-club-e9d0323937129330c7cd9b49c827a96a05ff9892.tar.gz
perlweeklychallenge-club-e9d0323937129330c7cd9b49c827a96a05ff9892.tar.bz2
perlweeklychallenge-club-e9d0323937129330c7cd9b49c827a96a05ff9892.zip
Challenge 214 do-over (Raku)
-rw-r--r--challenge-214/mark-anderson/raku/ch-1.raku2
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-214/mark-anderson/raku/ch-1.raku b/challenge-214/mark-anderson/raku/ch-1.raku
index 94051dcb01..a710eb92b6 100644
--- a/challenge-214/mark-anderson/raku/ch-1.raku
+++ b/challenge-214/mark-anderson/raku/ch-1.raku
@@ -5,7 +5,7 @@ is rank-score(<1 2 4 3 5>), <5 4 S B G>;
is rank-score(<8 5 6 7 4>), <G 4 B S 5>;
is rank-score(<3 5 4 2>), <B G S 4>;
is rank-score(<2 5 2 1 7 5 1>), <4 S 4 6 G S 6>;
-is rank-score(<22 77 11 55 77 11 22 22 11 22 22>), <4 G 9 B G 9 4 4 9 4 4>;
+is rank-score(<20 76 15 55 76 15 20 20 15 20 20>), <4 G 9 B G 9 4 4 9 4 4>;
sub rank-score($list)
{