Fortran Coder

标题: 循环调用子程序，运行时出错，求助 [打印本页]

作者: kid 时间: 2020-10-15 17:04
标题: 循环调用子程序，运行时出错，求助
运行程序时，出现了如下图的错误，网上查了一下是读取的数据量大于文本中存放的数据量，但是我自己排查了一下，觉得不存在这个问题。我大概描述一下程序关系，有子程序A、B、C、D、E，
主程序依次调用了子程序A、B、C
其中子程序A循环调用了子程序D（A←D）
B循环调用了D（B←D）
C调用了A和E（C←A、E），E中也有一个DO循环读取文本中的数据
循环结构如图二所示，DO循环，读取文件的每一行数据，代入子程序中计算。
最后运行出现了图一的错误，因为程序是课题组的不能上传，请大佬们见谅
找了好几天了，一直发现不了问题，救救孩子

CX.png (39.96 KB, 下载次数: 287)

运行错误提示

xh.png (6.53 KB, 下载次数: 266)

循环调用程序

作者: Transpose 时间: 2020-10-15 18:51
可以加一些输出调试，比如把程序读文件数据的地方同时写上输出，然后两者做对比，再和原始的数据做对比，应该就能找出来了

作者: kid 时间: 2020-10-16 09:28

Transpose 发表于 2020-10-15 18:51
可以加一些输出调试，比如把程序读文件数据的地方同时写上输出，然后两者做对比，再和原始的数据做对比，应 ...

谢谢大佬，我再试试

欢迎光临 Fortran Coder (http://bbs.fcode.cn/)