RosettaCodeData/Task/Palindrome-detection/Factor/palindrome-detection.factor
2023-07-01 13:44:08 -04:00

2 lines
69 B
Factor

USING: kernel sequences ;
: palindrome? ( str -- ? ) dup reverse = ;