문제

I cannot find any functions that given a min and a max return all the values in that interval for any of the structures in containers. Surely there must be...?

도움이 되었습니까?

해결책

inRange :: Ord a => a -> a -> Set a -> Set a
inRange min max s = fst $ S.split max gt
  where (_, gt) = S.split min s

다른 팁

You can write this really easily with Data.Set.filter:

import Data.Set (Set)
import qualified Data.Set as S

between :: Ord a => a -> a -> Set a -> Set a
between min_ max_ = S.filter (\x -> min_ <= x && x <= max_)

Then you can use it as

> between 3 7 $ S.fromList [1..10]
fromList [3, 4, 5, 6, 7]
라이센스 : CC-BY-SA ~와 함께 속성
제휴하지 않습니다 StackOverflow
scroll top