[请益] 关于ALLOCATE 副程式该怎么宣告?

楼主: freedomQ (香肠)   2013-02-26 13:33:18
主程式的宣告
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
副程式这样宣告阵列可以吗??
恳请各位高手帮我看看 谢谢
作者: terryys (terry)   2013-02-27 09:48:00
使用超出你宣告的大小会这样,例如宣告a(10)但你想用a(11)
作者: philodi (我老婆好疼我喔)   2013-03-02 11:40:00
你要先确定矩阵爆掉是出现在哪里?再来就是副程式可以直接这样 SUBROUTINE(N,X)INTEGER N REAL X(N) 如此不用在副程式中使用ALLOCATABLE

Links booklink

Contact Us: admin [ a t ] ucptt.com