Write a Prolog program that checks if a given list describes a palindrome (that reads the same forward and backward). Name your source code palindrome.pl. Here are some example queries:

?- palindrome([a, b, c])

false

?- palindrome([a, b, c, b, a])

true

?- palindrome([x, y, x])

true

?- palindrome([x, x])

true

?- palindrome([b])

true

?- palindrome([])

true