如何测试浮点数是否为haskell中的整数？

Question

如果我在Haskell中有一个浮点数,我如何测试它是否是整数.

Answer 1

isInt x = x == fromInteger (round x)

> isInt 2
True
> isInt 2.5
False

只是提醒一下:永远记住浮点数的全能诅咒:

> isInt (0.1^2*200)
False
> 0.1^2*200
2.0000000000000004

Answer 2

好的,所以这是晚了一年,但我很喜欢修改上述内容:

--Returns if x is an int to n decimal places
isInt :: (Integral a, RealFrac b) => b -> a -> Bool
isInt x n = (round $ 10^(fromIntegral n)*(x-(fromIntegral $ round x)))==0

所以,例如isInt 4.0001 3返回True但isInt 4.0001 4返回False.用一个值运行它10几乎总是准确的,浮动错误将再次给你的问题; 我经常使用7.