Anonymous user
JortSort: Difference between revisions
m
Adds Janet implementation
Thundergnat (talk | contribs) (Rename Perl 6 -> Raku, alphabetize, minor clean-up) |
m (Adds Janet implementation) |
||
Line 522:
jortSort&> 1 2 4 3;14 6 8;1 3 8 19;'ac';'sux';'CVGH';'PQRST'
0 0 1 1 1 0 1</lang>
=={{header|Janet}}==
<lang janet>(defn jortsort [xs]
(deep= xs (sorted xs)))
(print (jortsort @[1 2 3 4 5])) # true
(print (jortsort @[2 1 3 4 5])) # false</lang>
=={{header|Java}}==
| |||