Sorting algorithms/Quicksort: Difference between revisions
Content added Content deleted
m (→{{header|REXX}}: added/changed whitespace and comments.) |
m (→version 1: aligned a statement.) |
||
| Line 4,181: | Line 4,181: | ||
else if @.?>@.h then do; p=@.h; @.h=@.L; end |
else if @.?>@.h then do; p=@.h; @.h=@.L; end |
||
else do; p=@.?; @.?=@.L; end |
else do; p=@.?; @.?=@.L; end |
||
j=L+1; k=h |
j=L+1; k=h |
||
do forever |
do forever |
||
do j=j while j<=k & @.j<=p; end /*a tinie-tiny loop.*/ |
do j=j while j<=k & @.j<=p; end /*a tinie-tiny loop.*/ |
||