RosettaCodeData/Task/Palindrome-detection/PicoLisp/palindrome-detection.l
Ingy döt Net b83f433714 tasks a-s
2013-04-10 23:57:08 -07:00

2 lines
59 B
Text

(de palindrome? (S)
(= (setq S (chop S)) (reverse S)) )