确定因子指数

Question

我遇到了这段代码的编译问题，但我们真的不知道为什么。

有什么想法？

--divisorCount :: Int -> Int -> Int -> Int 
    divisorCount numer denom counter 
        | numer `mod` denom == 0 = divisorCount (floor(numer / denom)) denom (counter+1)
        | otherwise = -1

Answer 1

您的numer和denom必须同时为Integral，mod和Fractional，/。这是不可能的。

但是，通过在分割前转换fromIntegral或通过truncate（或使用round，ceiling轻松修复， floor之前的mod。{/ p>

或者你可以简单地使用div，就像@Willem建议的那样。

Answer 2

检查出来

divisorCount numer denom counter
    | (q, 0) <- numer `divMod` denom = divisorCount q denom (counter+1)
    | otherwise = -1