Sorting algorithms/Comb sort: Difference between revisions
m
→{{header|Mathematica}}
Drkameleon (talk | contribs) (Added Arturo implementation) |
|||
Line 2,111:
<pre>[0,0,2,3,3,8,17,36,40,72]</pre>
=={{header|Mathematica}}/{{header|Wolfram Language}}==
<lang Mathematica>combSort[list_] := Module[{ gap = 0, listSize = 0, swaps = True},
gap = listSize = Length[list];
Line 2,127:
]
]</lang>
<pre>combSort@{2, 1, 3, 7, 6}
->{1, 2, 3, 6, 7}</pre>
=={{header|MATLAB}} / {{header|Octave}}==
| |||