Sort numbers lexicographically: Difference between revisions
Added Quackery.
(Added Quackery.) |
|||
Line 1,015:
<pre>[1, 10, 11, 12, 13, 2, 3, 4, 5, 6, 7, 8, 9]
</pre>
=={{header|Quackery}}==
<lang Quackery> [ [] swap times
[ i^ 1+ number$
nested join ]
sort$
[] swap
witheach
[ $->n drop join ] ] is task ( n --> [ )
13 task echo</lang>
{{out}}
<pre>[ 1 10 11 12 13 2 3 4 5 6 7 8 9 ]</pre>
=={{header|Racket}}==
| |||