Jump to content

Permutations: Difference between revisions

m
(→‎{{header|Perl 6}}: missing semicolon in entity)
Line 259:
ENDPROC
DEF PROC_Permutation_Reverse(A%(), firstindexfirst, lastindexlast)
LOCAL first, last
first = firstindex
last = lastindex
WHILE first < last
SWAP A%(first), A%(last)
Cookies help us deliver our services. By using our services, you agree to our use of cookies.