Sorting algorithms/Counting sort: Difference between revisions

m
(→‎{{header|Ruby}}: used concat)
Line 493:
--- Is 'ar' sorted in ascending order?
require
ar_not_empty: ar.is_empty = FALSEFalse
local
i: INTEGER
do
Result := TRUETrue
from
i := ar.lower
Line 504:
loop
if ar [i] > ar [i + 1] then
RESULTResult := FALSEFalse
end
i := i + 1
Line 511:
 
end
 
</lang>
TEST:
Anonymous user