arquivo que funciona

o código da erro quando tento rodar fala que a variável AA está com problema de deifnição

' A library of matrix subroutines. Function prototypes are in matrix.bi. ' ludcmp (n, d, a(), indx(), iflag)--> LU decomposition of a(n,n) ' ...