数组值需要 Fortan 建议

问题描述

我是 Fortran 新手,需要一些资源来开始学习基础知识。这个问题可能很微不足道,但目前,我有一个可能用旧版本编写的代码,并显示一条警告消息,内容如下:

gfortran -O2 -ffpe-summary='none' -c argo.f
argo.f:2060:37:

 2051 |       DO J=0,THRESHOLD
      |                                                                        2
......
 2060 |         MUAVNEW = MUAVNEW + MASSJ*SN(J)
      |                                     1
Warning: Array reference at (1) out of bounds (0 < 1) in loop beginning at (2)
argo.f:2061:29:

 2051 |       DO J=0,THRESHOLD
      |                                                                        2
......
 2061 |         DENTOT = DENTOT + SN(J)
      |                             1
Warning: Array reference at (1) out of bounds (0 < 1) in loop beginning at (2)

您能否就如何避免此警告提出建议?

解决方法

暂无找到可以解决该程序问题的有效方法,小编努力寻找整理中!

如果你已经找到好的解决方法,欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@)