Fortran 运行时错误 "fixed"通过写入输出

Question

我遇到了一些用于研究的旧代码的问题，我想使用英特尔 Fortran 编译器进行编译。在特定的子程序中，除非我添加 write，否则我会遇到段错误。仅输出循环索引值的语句。

do j=1,ne

SOME STUFF

write(*,*) 'j=', j

end

是什么导致了我的错误，以至于这个 write 语句可以修复我的段错误？ (注意:j 被声明为整数)

谢谢，
凯利

Answer 1

导致此类错误的经典方法是通过插入 write 语句“修复”:

离开数组的末尾——使用你的编译器打开边界检查和调试选项来检查这个；

提供给子程序的参数与预期的参数之间存在分歧。同样，如果可能，请使用您的编译器，否则请使用您的眼睛。

其中一个是原因的赔率是 5 比 1。