Jordan-Pólya numbers: Difference between revisions
Content added Content deleted
m (Minor alteration.) |
SqrtNegInf (talk | contribs) m (→{{header|Raku}}: simplify with 'splice') |
||
Line 1,536: | Line 1,536: | ||
my \p = @res.keys.first: { @res[$_] >= kl } # performance |
my \p = @res.keys.first: { @res[$_] >= kl } # performance |
||
if p < @res.elems and @res[p] != kl { |
if p < @res.elems and @res[p] != kl { |
||
@res |
@res.splice: p, 0, kl |
||
} elsif p == @res.elems { |
} elsif p == @res.elems { |
||
@res.append: kl |
@res.append: kl |