为什么在 Haskell 中使用范围时 map 会返回一个附加元素? [英] Why does map return an additional element when using ranges in Haskell?

查看:13
本文介绍了为什么在 Haskell 中使用范围时 map 会返回一个附加元素?的处理方法,对大家解决问题具有一定的参考价值,需要的朋友们下面随着小编来一起学习吧!

问题描述

I've just started learning Haskell and found a strange thing.

Let we have a list:

ghci> [0,2..5]
[0,2,4]

It has 3 elements. When I use map with this list I get 3 element as output, for example:

ghci> map (+ 1) [0,2..5]
[1,3,5]
ghci> map (* 2) [0,2..5]
[0,4,8]
ghci> map (`div` 2) [0,2..5]
[0,1,2]

But when I use fractional division I get 4 elements in output list:

ghci> map (/ 2) [0,2..5]
[0.0,1.0,2.0,3.0]
ghci> length (map (/ 2) [0,2..5])
4

Could you please explain why map may return more elements then it was?

Thank you!

解决方案

It's due to the implementation of Enum for Float and Double:

> [0,2..5] :: [Float]
[0.0,2.0,4.0,6.0]

It's not map doing it, but Float. Specifically, if you call enumFromThenTo 0 2 5 :: [Float], you'll get the same list. You'll see the same results for Double.

This is hinted at in the haskell report, but the behavior is definitely non-obvious. Essentially, it comes down to the implementation of numericEnumFromThenTo (we're getting into some Haskell internals here), which is used by the Enum Float instance:

numericEnumFromThenTo n n' m = takeWhile p (numericEnumFromThen n n')  
    where  
        p | n' >= n   = (<= m + (n' - n) / 2)  
          | otherwise = (>= m + (n' - n) / 2) 

numericEnumFromThen n m = iterate (+ (m - n)) n

So you have numericEnumFromThen 0.0 2.0 generating the list [0.0,2.0,4.0,6.0,8.0,...], then you do takeWhile p on that, which in this case is equivalent to the function x -> x <= 5.0 + (2.0 - 0.0) / 2, or more simply x -> x <= 6.0, which is why 6.0 is included in the output list of [0.0,2.0..5.0].

I can't explain why it's implemented this way, that's pretty baffling to me too, but hopefully I've answered the how for its implementation.

这篇关于为什么在 Haskell 中使用范围时 map 会返回一个附加元素?的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!

查看全文
登录 关闭
扫码关注1秒登录
发送“验证码”获取 | 15天全站免登陆