Go Fish/Raku: Difference between revisions
m
square-ish symbols sliced
Thundergnat (talk | contribs) (→{{header|Perl 6}}: Update to work with modern Rakudo) |
SqrtNegInf (talk | contribs) m (square-ish symbols sliced) |
||
Line 1:
{{collection|Go Fish}}
{{works with|Rakudo|
<lang perl6>constant BOOKSIZE = 4;
Line 27:
sub maxes (&f, *@a) {
my $x =
return @a.grep: { f($^e) eqv $x };
}
| |||