Sort numbers lexicographically: Difference between revisions
Content added Content deleted
(Added Quackery.) |
|||
Line 1,015: | Line 1,015: | ||
<pre>[1, 10, 11, 12, 13, 2, 3, 4, 5, 6, 7, 8, 9] |
<pre>[1, 10, 11, 12, 13, 2, 3, 4, 5, 6, 7, 8, 9] |
||
</pre> |
</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}}== |
=={{header|Racket}}== |