PalindromeQ[i_String] := StringReverse[i] == i