Anonymous user
Sorting algorithms/Heapsort: Difference between revisions
m
→version 1: changed a comment. -- ~~~~
m (→version 1: removed a superfluous line of code (assigment). -- ~~~~) |
m (→version 1: changed a comment. -- ~~~~) |
||
Line 2,155:
end /*j*/
do n=n by -1 to 2
_=@.1; @.1=@.n; @.n=_; call shuffle 1,n-1 /*swap
end /*n*/
return
| |||