RosettaCodeData/Task/Palindrome-detection/Clojure/palindrome-detection-2.clj
2019-09-12 10:33:56 -07:00

5 lines
194 B
Clojure

(defn palindrome? [^String s]
(loop [front 0 back (dec (.length s))]
(or (>= front back)
(and (= (.charAt s front) (.charAt s back))
(recur (inc front) (dec back)))))