struct a
integer array i[20]
endstruct

globals
a array b
endglobals

//............
set b[n].i[m] = ...
//.............

// set MyArray[x*MAX_COL+y] = 123
// set zzz = MyArray[x*MAX_COL+y]
//
// MAX_COL - максимально кол-во столбцов
// x - номер нужной строки
// y - номер нужного столбца
//
//   x\y  0   1   2   3   4   5   6   7
//      +---+---+---+---+---+---+---+---+
//   0  +   +   +   +   +   +   +   +   +
//      +---+---+---+---+---+---+---+---+
//   1  +   +   +   +   + z +   +   +   +
//      +---+---+---+---+---+---+---+---+
//   2  +   +   +   +   +   +   +   +   +
//      +---+---+---+---+---+---+---+---+
//
//    MAX_COL = 8
//
// чтобы получить значение z, нужно вернуть значение MyArray[1*MAX_COL+4]
// то есть MyArray[12]

//real MyArray[CountX][CountY][CountZ]
globals
    constant integer CountX = 20
    constant integer CountY = 20
    constant integer CountZ = 20
    real array MyArray
endglobals

//set MyArray[x][y][z] = val
function SetVal takes integer x, integer y, integer z, real val returns nothing
    set MyArray[z*(CountX*CountY)+y*CountX+x] = val
endfunction

//MyArray[x][y][z]
function GetVal takes integer x, integer y, integer z returns real
    return MyArray[z*(CountX*CountY)+y*CountX+x]
endfunction