[Maxima]Pb with array in translated code



Hello,

I have the following code that work in batch file. But when I run it
in translated version Maxima tell me :

Maxima encountered a Lisp error:

 Error in PROGN [or a callee]: not a valid array reference to #2A....

The bug is on array: ELEMENT_COMPLEXITY_ARRAY when i do :

            ELEMENT_COMPLEXITY_ARRAY[I,J]:N,

In the loop.

The code :

GCD_ARRAY:MAKE_ARRAY('ANY,1);
SAVED_GCD_ARRAY:MAKE_ARRAY('ANY,1);
ELEMENT_COMPLEXITY_ARRAY:MAKE_ARRAY('FIXNUM,1,1);
EQUATION_COMPLEXITY_ARRAY:MAKE_ARRAY('FIXNUM,1);
AVAILABLE_PIVOTS_ARRAY:MAKE_ARRAY('ANY, 1);
INDEXES_ARRAY:MAKE_ARRAY('FIXNUM,1);
A0:MATRIX([0]);

INITIALISATION(A0,NROW,NCOL):=BLOCK(
    [I,J,M,N],
    MODE_DECLARE([I,J,M,N,NROW,NCOL],FIXNUM),
    GCD_ARRAY:MAKE_ARRAY('ANY,NROW+1),
    SAVED_GCD_ARRAY:MAKE_ARRAY('ANY,NROW+1),
    ELEMENT_COMPLEXITY_ARRAY:MAKE_ARRAY('FIXNUM,NROW+1,NCOL+2),
    EQUATION_COMPLEXITY_ARRAY:MAKE_ARRAY('FIXNUM,NROW+1),
    INDEXES_ARRAY:MAKE_ARRAY('FIXNUM,NROW+1),
    FOR I:1 THRU NROW DO (
        M:0,
        GCD_ARRAY[I]:1,
        SAVED_GCD_ARRAY[I]:1,
        FOR J:1 THRU NCOL+1 DO (
            N:COMPLEXITY(A0[I,J]),
            display(I,J,N),
            ELEMENT_COMPLEXITY_ARRAY[I,J]:N,
            M:M+N
        ),
        EQUATION_COMPLEXITY_ARRAY[I]:M
    )
);
 

Thanks for your help.