a := Array( 1 .. 10^6, datatype = integer[1] ):