Move ix001 to base/tests
[packages/base.git] / tests / ix001.hs
1 import Data.Ix
2 import Data.Int
3
4 main = print (index (minBound::Int16,maxBound) maxBound)