使用Haskell编写一个函数，判断一个字符串是否为回文。

在Haskell中，可以使用以下函数来判断一个字符串是否为回文：

isPalindrome :: String -> Bool
isPalindrome str = str == reverse str

这个函数接受一个字符串作为参数，然后将字符串与其反转后的版本进行比较。如果它们相等，那么该字符串就是一个回文，返回True；否则，返回False。

以下是使用这个函数的例子：

main :: IO ()
main = do
  putStrLn "请输入一个字符串："
  str <- getLine
  let result = isPalindrome str
  putStrLn $ "该字符串是否为回文：" ++ show result

在上面的例子中，程序会先提示用户输入一个字符串，然后通过getLine函数获取用户的输入。接着，调用isPalindrome函数判断输入字符串是否为回文，并将结果绑定到result变量上。最后，程序会输出结果到屏幕上，显示该字符串是否为回文。

根据输入的字符串的不同，程序会输出如下的结果：

请输入一个字符串：
racecar
该字符串是否为回文：True

请输入一个字符串：
hello
该字符串是否为回文：False

需要注意的是，该函数在比较字符串是否为回文时是区分大小写的。如果你想要忽略大小写，可以在比较之前先将字符串转换为小写或大写形式。