Talk:ABC problem: Difference between revisions

Line 132:
<code>
(defun word-possible-p (word alphabet)
(labels ((%usablep (b) (find (char-upcase (char word 0)) b)))
(find (char-upcase (char word 0)) b)))
(or (zerop (length word))
(iter
Anonymous user