JortSort: Difference between revisions
→{{header|Common Lisp}}
m (added an antecedent for "other") |
|||
Line 367:
=={{header|Common Lisp}}==
<lang lisp>
(defun jort-sort (x)
(equalp x (sort (copy-seq x) #'<)))
</lang>
|
m (added an antecedent for "other") |
|||
Line 367:
=={{header|Common Lisp}}==
<lang lisp>
(defun jort-sort (x)
(equalp x (sort (copy-seq x) #'<)))
</lang>
|
edits