浮点列表生成器

Question

可能重复:
Haskell范围和浮点数

如果我在ghci中生成一个列表,就像这样

let a = [0.1,1..10]

这给了我一个带有以下条目的列表a

[0.1,1.0,1.9,2.8,3.6999999999999997,4.6,5.5,6.4,7.300000000000001,8.200000000000001,9.100000000000001,10.000000000000002]

列表的最后一个元素是10.000000000000002,我假设这只是由于浮点使用.然而,与数字10相比,结果似乎不一致,例如,

last a > 10
True

last a < 10
False

为什么列表创建不比较最终元素是否小于或等于10？

Answer 1

根据Prelude的参考实现,当值大于最终值加1/2时,浮点数的算术序列停止:

numericEnumFrom         :: (Fractional a) => a -> [a]  
numericEnumFromThen     :: (Fractional a) => a -> a -> [a]  
numericEnumFromTo       :: (Fractional a, Ord a) => a -> a -> [a]  
numericEnumFromThenTo   :: (Fractional a, Ord a) => a -> a -> a -> [a]  
numericEnumFrom         =  iterate (+1)  
numericEnumFromThen n m =  iterate (+(m-n)) n  
numericEnumFromTo n m   =  takeWhile (<= m+1/2) (numericEnumFrom n)  
numericEnumFromThenTo n n' m = takeWhile p (numericEnumFromThen n n')  
                             where  
                               p | n' >= n   = (<= m + (n'-n)/2)  
                                 | otherwise = (>= m + (n'-n)/2)

至于为什么,你必须要问委员会,但很可能他们不希望范围最终"不完整",并且认为让它有点过大会不那么不直观.有浮点,它总是一个或另一个.