Index finite lists of positive integers: Difference between revisions
Content added Content deleted
SqrtNegInf (talk | contribs) m (→{{header|Perl 6}}: list cannot start with zero in base-11 solution) |
|||
Line 466: | Line 466: | ||
sub unrank(Int $n) { $n.base(11).split('A') } |
sub unrank(Int $n) { $n.base(11).split('A') } |
||
say my @n = ( |
say my @n = (1..20).roll(12); |
||
say my $n = rank(@n); |
say my $n = rank(@n); |
||
say unrank $n;</lang> |
say unrank $n;</lang> |