MODE FOO = STRUCT(CHAR u,l);
INT n := 26;
[n]FOO f;
# Additionally each item can be initialised #
FOR i TO UPB f DO f[i] := (REPR(ABS("A")-1+i), REPR(ABS("a")-1+i)) OD;
print((f, new line))