summaryrefslogtreecommitdiff
path: root/libraries/base/tests/enumNumeric.hs
blob: 36c4846d1fc739b2c91a988b0a1a1ac8f186345f (plain)
1
2
3
4
5
6
7
main :: IO ()
main = do
    print $ map (/2) ([5..6] :: [Double])
    print $ ([9007199254740990..9007199254740991] :: [Double])
    print $ map (/2) ([9007199254740990..9007199254740991] :: [Double])
    print $ ([9007199254740989..9007199254740990] :: [Double])
    print $ map (/2) ([9007199254740989..9007199254740990] :: [Double])