求助各位大佬，数组越界问题怎么解决

FFX

运行到这里下面这段时会出现“forrtl: severe (408): fort: (2): Subscript #2 of the array LAYERF has value 7076 which is greater than the upper bound of 301”。按照一位大佬教的单步调试，总是直接闪退。请问各位大佬怎么解决？

[Fortran] 纯文本查看 复制代码

查看代码

打印?

01	open(3,file = 'inih.dat')

02	do i = 1,sumnode

03	read(3,*) (pre_inih(i,j),j = 1,2)

04

enddo

05

close(3)

06	do i = 1,sumnode

07	layerf(num_node(i,1),num_node(i,2),relayer(i)) = node(i,4)

08	para(num_node(i,1),num_node(i,2),relayer(i)) = para_list(i)

09	inih(num_node(i,1),num_node(i,2),relayer(i)) = pre_inih(i,2)

10

enddo

li913

数组越界

FFX

li913 发表于 2023-5-30 19:17
数组越界

大佬，routine、line、source下面都是unknown怎么办？

li913

FFX 发表于 2023-5-31 09:05
大佬，routine、line、source下面都是unknown怎么办？

切换debug模式。