Error 1 error #6410: This name has not been declared as an array or a function.   [SIGMA_0]
Error 2 error #6410: This name has not been declared as an array or a function.   [SIGMA_K]
Error 3 error #6911: The syntax of this substring is invalid.[SIGMA_E_GRID_SPACE]

相关部分程序：  

...
...

REAL*8 :: sigma_e_grid_space(ie_tot, je_tot, ke_tot） ！定义了一个三维矩阵
REAL*8 :  sigma_0(1,2*upml+ke), sigma_k(1,2*upml+ke)  ！定义了两个2维矩阵

CALL RANDOM_NUMBER (a_decimal)
a =  FLOOR(a_decimal*(ke_tot-upml-upml-1+1)+upml+1)
[color=800000][b]sig_00 = sigma_0(1,a)[/b]   ！错误1[/color]

CALL RANDOM_NUMBER(u);
b = SIGN(uu,u-0.5)*T*((1+1/T)**ABS(2*u-1)-1);   ！b，sig_ptb是一个具体的数。
sig_ptb = sig_00 + b*(sigma_max - sigma_min)


[color=800000][b]sigma_k(1,a) = sig_ptb;[/b] ！错误2[/color]
[color=800000][b]sigma_e_grid_space(:,:,a) = sig_ptb;[/b] ！错误3[/color]
...
...

注：所列出是部分程序，其中的变量我都已经有定义。
这三个错误，请教高手，谢谢！