4785170771e6c60ee4c1d65a7bac6b7c3de2cd01
[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: