Anadromes: Difference between revisions
Content added Content deleted
imported>Rowsety Moid No edit summary |
imported>Rowsety Moid m (Simplified the Common Lisp code) |
||
Line 409: | Line 409: | ||
(let ((rev (reverse word))) |
(let ((rev (reverse word))) |
||
(and (string-lessp word rev) |
(and (string-lessp word rev) |
||
(gethash rev dict) |
(gethash rev dict)))) |
||
(not (string-equal word rev))))) |
|||
words)))) |
words)))) |
||