RosettaCodeData/Task/Palindrome-detection/Common-Lisp/palindrome-detection-1.lisp
2023-07-01 13:44:08 -04:00

2 lines
51 B
Common Lisp

(defun palindrome-p (s)
(string= s (reverse s)))