T7233.hs 609 Bytes
Newer Older
Simon Marlow's avatar
Simon Marlow committed
1 2 3 4 5 6 7 8 9 10 11 12 13 14
import Data.Int
import Data.Word

main = do
  print [5 `div` (minBound+k::Int)    | k <- [0 .. 10]]
  print [5 `div` (minBound+k::Int8)   | k <- [0 .. 10]]
  print [5 `div` (minBound+k::Int16)  | k <- [0 .. 10]]
  print [5 `div` (minBound+k::Int32)  | k <- [0 .. 10]]
  print [5 `div` (minBound+k::Int64)  | k <- [0 .. 10]]
  print [5 `quot` (minBound+k::Int)    | k <- [0 .. 10]]
  print [5 `quot` (minBound+k::Int8)   | k <- [0 .. 10]]
  print [5 `quot` (minBound+k::Int16)  | k <- [0 .. 10]]
  print [5 `quot` (minBound+k::Int32)  | k <- [0 .. 10]]
  print [5 `quot` (minBound+k::Int64)  | k <- [0 .. 10]]