浮動小数点数がhaskellの整数であるかどうかをテストするにはどうすればよいですか？

Question

ハスケルに浮動小数点数がある場合は、それが整数かどうかをどのようにテストすればいいですか？

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の値で実行すると、float-errorsが問題を再現できるほど正確になります。私は通常7を使用します。