Anonymous user
Sorting algorithms/Permutation sort: Difference between revisions
GP
(GP) |
|||
Line 585:
1 2 3 4 5 6</lang>
=={{header|PARI/GP}}==
<lang parigp>permutationSort(v)={
my(u);
for(k=1,(#v)!,
u=vecextract(v, numtoperm(#v,k));
for(i=2,#u,
if(u[i]<u[i-1], next(2))
);
return(u)
)
};</lang>
=={{header|Perl 6}}==
| |||