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

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