Código de Haskell - Polindomo (capicua)

-- Dada 1 lista devuelve true, si es palindromo (capicua) y false en caso contrario

palindrome :: [Int] -> Bool

palindrome [] = True

palindrome [x] = True

palindrome(x:xs) = reversa (x:xs) == (x:xs)