主页 / coding / 问题 / 76923808
Accepted
Stéphane Laurent
Asked: 2023-08-18 01:20:26 +0800 CST

Haskell 模数类似于 JavaScript（考虑符号并且适用于非整数）

  • 772

在 JavaScript 中：

console.log(13 % 5);
// Expected output: 3

console.log(-13 % 5);
// Expected output: -3

我在 Haskell 中也需要同样的东西。我做到了

:{
modulo :: Double -> Int -> Double
modulo a p = 
    let p' = fromIntegral p
    in
    if a > 0 
        then a - fromIntegral(p * floor(a/p'))  
        else a - fromIntegral(p * ceiling(a/p'))
:}

这似乎有效（至少我发现与 JavaScript 的结果相同）。有没有更好的办法？

相反rem，它应该适用于Double a：

ghci> modulo (-13.5) 5
-3.5
haskell

1 个回答

  1. Best Answer

    这已经存在，这是rem :: Integral a => a -> a -> a：

    ghci> 13 `rem` 5
3
ghci> (-13) `rem` 5
-3

    Haskell 有两对关于除法和取模的函数：div和mod，它们向负无穷大截断；和quot和rem向零截断。

    或对于RealFrac类型：

    fracRem :: (RealFrac a, Integral b) => a -> b -> a
fracRem x y = x - fromIntegral (y * (truncate x `quot` y))
    • 1

相关问题