AoC 2023, day 7
| Run Settings | |
|---|---|
| Language | Raku |
| Language Version | |
| Run Command |
| Snippet Metadata | |
|---|---|
| Owner | seaker |
| Created | 1 year ago |
| Modified | 1 year ago |
| Visibility | Public |
enum HandType <HighCard OnePair TwoPair Triple FullHouse Quadruple Quintuple>;
sub hand-type($h, $part --> HandType:D) {
my %a = $h.comb.Bag;
if $part eq 'p2' && %a.keys.grep('J') && %a<J> < 5 {
my $award = %a<J>:delete;
%a{ max(%a.keys, :by({ %a{$_} })) } += $award;
}
given +%a.keys {
when 1 { HandType::Quintuple }
| Editor Settings | |
|---|---|
| Theme | |
| Key bindings | |
| Full width | |
| Lines |