//
define var hx hash 20,aa as int;
define var x[5] as DEC(5,2) = 23.45;
define var xx as char(10) = 1234567890;
define var y[3],z[2,3,4] = 1,2,3;
//define var y[3],z[2,3,4] as INT = 1,2,3;
define type array int aaa[5];
//define var yy[3] as aaa = 4,5,6,7;
dim s[10] a[];
dim yy as aaa;
proc main;
	print x *x;
	print xx;
	print y z *y *z;
	print s a;
//	print yy;
	return ERROR;
end proc;
