Sorting algorithms/Gnome sort: Difference between revisions
Added Quackery
ReeceGoding (talk | contribs) m (→Starting from 2: indent) |
(Added Quackery) |
||
Line 2,684:
[1, 2, 3, 4, 5, 6]
>>></lang>
=={{header|Quackery}}--
<lang Quackery>[ dup size times
[ i^ 0 > if
[ dup i^ 1 - peek
over i^ peek
2dup > iff
[ dip [ swap i^ poke ]
swap i^ 1 - poke
-1 step ]
else 2drop ] ] ] is gnomesort ( [ --> [ )</lang>
=={{header|R}}==
| |||