Anonymous user
Best shuffle: Difference between revisions
m
→Version 2
m (→Version 2) |
m (→Version 2) |
||
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>abracadabra: (caardrabaab 0)
seesaw: (ewsase 0)
elk: (kel 0)
|