#tests multidimensional array - no functions yet
#should output 00112233445566778899101011111111111

module main;

const n:int = 11;
var i : int;

var arrI : array[n] of int;
var arrArrArrI : array[n] of array[n] of array[n] of int;
var arrB : array[n] of bool;
var arrArrB: array[n] of array[n] of bool;

begin

for i := 0 to 10 do
  arrI[i] := i;
  arrArrArrI[0][i][0] := arrI[i];
  arrB[i] := true;
  arrArrB[0][i] := arrB[i];
end;

for i := 0 to 10 do
  output := arrI[i];
  output := arrArrArrI[0][i][0];
end;

for i := 0 to 10 do
  if arrB[i]=true and arrArrB[0][i]=true then
    output := 1;
  end;
end;


end main.