diff options
Diffstat (limited to '2024/02/raku.raku')
| -rwxr-xr-x | 2024/02/raku.raku | 9 |
1 files changed, 0 insertions, 9 deletions
diff --git a/2024/02/raku.raku b/2024/02/raku.raku deleted file mode 100755 index 9b930de..0000000 --- a/2024/02/raku.raku +++ /dev/null @@ -1,9 +0,0 @@ -#!/usr/bin/env raku - -my @rs = lines>>.words.map(&cache); - -sub incr ($r) { $r.rotor(2=>-1).map({ ([-] $_) (elem) (1..3)}).all }; -sub safe ($r) { so $r.&incr || $r.reverse.&incr }; - -say "silver: ", @rs.map(&safe).sum; -say "gold: ", @rs.map({ $_.combinations($_-1).map(&safe).any.so }).sum; |
