Question

fortran调用CPU-TIME无结果

计算程序所用CPU机时，开头open(106,file='cputime.txt')，然后调用call CPU-TIME(start)，结尾调用call CPU-TIME(finish)，最后write (106,200) finish-start 。执行后cputime.txt这个文件有，但是里面没东西，大小为0K。为什么？





Answer 1

这是sqrt和atan2函数的定义域出错了，例如负数开方，NaN开方，等等。看起来p=(x(i)-x(j))**2+(y(i)-y(j))**2应该是大于等于0的，不会出现负数开方。但如果xy本身就出现了NaN，那么也会使得p为NaN，导致sqrt定义域出错。玩计算的话，Debug调试是基本功，在sqrt处下断点，然后看看xy数组里是否出现了NaN。单步调试，你会自己解决很多问题。因为你没给出全部代码，所以我不能代劳。