请教一下codeblocks下调试Fortran代码出现NaN的情况

elf唯sj

运行以后就会一直是这个状况不停止
刚刚接触Fortran不久 求各位大神帮忙看看是什么原因 感激不尽
POINTEHL.f90 (29.23 KB, 下载次数: 2)

2018-11-17 16:21 上传

点击文件名下载附件

fcode

学会单步调试，你的问题可以自行解决90%以上。
单步调试可以在这里学习
http://debug.w.fcode.cn
http://v.fcode.cn/video-debugger.html

回到你的问题，TAUCAL 函数中
RRL0=(RRL-UUAB)/(CH*(FF1+FF2))
这里的 FF1  和 FF2，在 K 较大时，越来越趋近于互为相反数。
导致 FF1+FF2 等于0，然后做为除数，就出现了 NaN

elf唯sj

fcode 发表于 2018-11-17 22:09
学会单步调试，你的问题可以自行解决90%以上。
单步调试可以在这里学习
http://debug.w.fcode.cn

非常感谢 单步调试确实非常有用

elf唯sj

fcode 发表于 2018-11-17 22:09
学会单步调试，你的问题可以自行解决90%以上。
单步调试可以在这里学习
http://debug.w.fcode.cn

您好 可否请您再帮我看一下这个程序的问题
http://bbs.fcode.cn/forum.php?mo ... amp;page=1#pid10059
我进行了单步调试，发现了问题但是改正后发现情况并没有改善 不知道是我的问题找的不对还是改正方法不对 请您帮我看一下吧 十分感谢