[project @ 1997-03-14 07:52:06 by simonpj]
[ghc-hetmet.git] / ghc / lib / tests / Array / arr001 / Main.hs
1 -- Simple array creation
2
3 import Array
4
5 main =
6  let a1 = array (1,3) (zip [2,3,1] ['a'..'d']) in
7  print a1
8
9 -- Result: