include io.increcord foo is  var a: int;endrecord bar is  var a: foo;endfunction main(argv: array of string): int is    var x: array of bar;        y: bar;        z: foo;begin	x := new array[5] of bar;  z.a := 3;	x[1].a := z;	x[0].a := y;  x[0].a.a := z.a;  x[0].z := y;	  return 0;end