Best shuffle: Difference between revisions

m
Line 1,142:
 
===Version 2===
 
<lang lisp>(defun all-best-shuffles (str)
(let (tbl out (shortest (length str)) (s str))
Line 1,191 ⟶ 1,190:
</lang>
 
The output is:
<lang lisp>
<lang lisp>abracadabra: (caardrabaab 0)
seesaw: (ewsase 0)
elk: (kel 0)
Anonymous user