99-haskell-problems/Problems 01-10/problem_06.hs

3 lines
89 B
Haskell
Raw Normal View History

2024-05-24 17:06:42 -05:00
isPalindrome :: (Eq a) => [a] -> Bool
isPalindrome = (==) <$> foldl (flip (:)) [] <*> id