Longest increasing subsequence: Difference between revisions

→‎Patience sorting: // instead of ternaries
m (→‎Patience sorting: useless semi-colons, newline and comment)
(→‎Patience sorting: // instead of ternaries)
Line 264:
for @d -> $card {
if defined my $i = first { @S[$_][*-1].key > $card }, ^@S {
@S[$i].push: $card => $i ?? @S[$i-1][*-1] !!// Mu
} else {
@S.push: [ $card => @S ?? @S[*-1][*-1] !!// Mu ].item
}
}
1,934

edits