Skip to content

Instantly share code, notes, and snippets.

What would you like to do?
;; ariarule's solution to Word Sorting
(fn sortwords [s]
(letfn [(wordcomp [w x]
(apply compare (map #(.toLowerCase %) [w x])))]
(sort wordcomp (.split s "[^a-zA-Z]"))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
You can’t perform that action at this time.