我知道我可以做到这一点...
isZero :: Int -> Bool
isZero x
| x == 0 = True
| otherwise = False
但是我可以做这样的事情吗?
isPalindrome :: Int -> Bool
isPalindrome x
let digitList = intToDigits x -- Decomposes the integer into
-- digits, i.e. 37 -> [3, 7]
| digitList == reverse digitList = True
| otherwise = False
这将导致编译错误,但我相信您知道我要做什么。
最佳答案
改用 where
子句
isPalindrome :: Int -> Bool
isPalindrome x
| digitList == reverse digitList = True
| otherwise = False
where digitList = intToDigits x
当然,对于这个例子,我们可以跳过守卫并写
isPalindrome x = digitList == reverse digitList
where digitList = intToDigits x