JortSort: Difference between revisions

Content added Content deleted
(→‎{{header|Common Lisp}}: working implementation)
(added Factor)
Line 246: Line 246:
iex(3)> jortsort.([1,2,5,4])
iex(3)> jortsort.([1,2,5,4])
false</lang>
false</lang>

=={{header|Factor}}==
<lang factor>USING: kernel sorting ;
: jortsort ( seq -- ? ) dup natural-sort = ;</lang>


=={{header|FreeBASIC}}==
=={{header|FreeBASIC}}==