haskell - Haskell 中 Unresolved 重载错误

Question

getNext a = if even a then a/2 else (3*a)+1 

出于某种原因，这行代码返回一个 Unresolved 重载错误。

Main> getNext 13
ERROR - Unresolved overloading
*** Type       : (Fractional a, Integral a) => a

我做错了什么或我错过了什么？我有很长一段时间没有使用 Haskell，所以我可能忘记了一些事情。

Answer 1

你可能想要

a `div` 2

而不是

a/2

发生错误是因为 even a意味着 a是整数，但使用了非整数除法运算符 /另有含义。