diff options
| author | Mark <53903062+andemark@users.noreply.github.com> | 2023-03-28 08:29:52 +0000 |
|---|---|---|
| committer | Mark <53903062+andemark@users.noreply.github.com> | 2023-03-28 08:29:52 +0000 |
| commit | e8aa7d95e068054b568f60a5828f1a17d54f751e (patch) | |
| tree | f7f35da4f9f5c083984f96954babba8264ffcf5e | |
| parent | 88ac5a416468ac3dc894669ce4535e337fbf2764 (diff) | |
| download | perlweeklychallenge-club-e8aa7d95e068054b568f60a5828f1a17d54f751e.tar.gz perlweeklychallenge-club-e8aa7d95e068054b568f60a5828f1a17d54f751e.tar.bz2 perlweeklychallenge-club-e8aa7d95e068054b568f60a5828f1a17d54f751e.zip | |
Challenge 210 Solutions (Raku)
| -rw-r--r-- | challenge-210/mark-anderson/raku/ch-1.raku | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/challenge-210/mark-anderson/raku/ch-1.raku b/challenge-210/mark-anderson/raku/ch-1.raku index ce676caa8e..911c1f540e 100644 --- a/challenge-210/mark-anderson/raku/ch-1.raku +++ b/challenge-210/mark-anderson/raku/ch-1.raku @@ -13,10 +13,10 @@ is kill-and-win(6,4,5,4,1,3,2,9,2,4,7,1,1,9,8,2,2,2,4,4), 33; # choosing 3 or 8 sub kill-and-win(*@ints) { @ints.Bag + .sort .Array .push(@ints.max.succ => 0) .unshift(@ints.min.pred => 0) - .sort .rotor(3 => -2) .map(&total) .max |