主程式的宣告
real*8,allocatable::xi(:),ri(:),zi(:),yi(:),ECL(:)
副程式的宣告
subroutine FCN (XA, F, n1)
integer n1,g,o
real XA(n1), F(n1)
real beta1,lambda1
real sum1,sum2,sum3,sum4,sum5
real*8,allocatable::xi(:),ri(:)
common/a2/beta1,lambda1
由于主程式与副程式都很庞大所以我就省略,只贴上宣告变量的地方有疑惑
最后执行时出现了这行想请问这是跟我的阵列大小有关吗?
forrtl severe <161>:program EXception - array bounds exceeded
副程式这样宣告阵列可以吗??
恳请各位高手帮我看看 谢谢