Sorting algorithms/Sleep sort: Difference between revisions
Content added Content deleted
(Add a simpler Tcl version) |
|||
| Line 1,101: | Line 1,101: | ||
</pre> |
</pre> |
||
=={{header|Mathematica}}== |
=={{header|Mathematica}}/{{header|Wolfram Language}}== |
||
<lang mathematica>SleepSort = RunScheduledTask[Print@#, {#, 1}] & /@ # &; |
<lang mathematica>SleepSort = RunScheduledTask[Print@#, {#, 1}] & /@ # &; |
||
SleepSort@{1, 9, 8, 7, 6, 5, 3, 4, 5, 2, 0};</lang> |
SleepSort@{1, 9, 8, 7, 6, 5, 3, 4, 5, 2, 0};</lang> |
||