let type t=array of int var x:=new t[2] of 0 in x[0-1] end