Apparently none
29 May, 2001 16:24
programming, livejournal
(defun permute (govno) (cond ((null govno) ‘(())) (t (mapcan #’(lambda (element) (mapcar #’(lambda (perm) (cons element perm)) (permute (remove* element govno :count 1 :test #’eq)))) govno))))