[紧急求助]请FORTRAN高手帮忙!!!!

liujianguo

程序运行过程中出现下面的错误,请高手指点是怎么回事.
crag  -1.44  0.000E+00  0.000E+00  0.000E+00  0.000E+00  0.000E+00  0.000E+00  1
.261E-02  0.000E+00  5.523E-03  0.000E+00
run-time error M6201: MATH
- sqrt: DOMAIN error
Image              PC        Routine            Line        Source
k3.exe             0052E299  Unknown               Unknown  Unknown
k3.exe             0052E0F7  Unknown               Unknown  Unknown
k3.exe             0052E251  Unknown               Unknown  Unknown
k3.exe             005305E8  Unknown               Unknown  Unknown
k3.exe             005574BC  Unknown               Unknown  Unknown
k3.exe             00550B40  Unknown               Unknown  Unknown
k3.exe             0054D348  Unknown               Unknown  Unknown
k3.exe             004BBEDB  Unknown               Unknown  Unknown
k3.exe             00401CA1  Unknown               Unknown  Unknown
k3.exe             0055BC79  Unknown               Unknown  Unknown
k3.exe             0054C7C4  Unknown               Unknown  Unknown
KERNEL32.dll       77E687F5  Unknown               Unknown  Unknown
谢谢高手帮忙了

anyone

是不是负数开方(SQRT)?
你在什么环境运行程序? WINDOWS/LINUX... 最好能找到DEBUG 工具. 否则就只好在程序里打印.

jimking

按照你说的来看，应该是出现了负数开平方(run-time error M6201: MATH
- sqrt: DOMAIN error)，在出错时，你可以根据错误代码去查错在哪里，如你的情形该去查6201，然后你就要根据所出问题去DEBUG你的程序了，呵!!

liujianguo

TO ANYONE:
  
   我用的是VISUAL FORTRAN,

liujianguo

TO JIMKING:
   你可以根据错误代码去查错在哪里，如你的情形该去查6201
你说的错误代码是什么意思啊,该怎么查啊.说实话我对FORTRAN根本不懂

anyone

下面引用由liujianguo在 2005/03/25 11:25am 发表的内容：
TO ANYONE:
  
   我用的是VISUAL FORTRAN,

VISUAL FORTRAN应该有DEBUG功能. 用DEBUG方式运行, 很快就能查到.
感觉基本可以确定是SQRT涵数的问题.

liujianguo

您说的用DEBUG运行是指什么啊?是说用win32-debug吗?我就是用win32－debug运行的

anyone

下面引用由liujianguo在 2005/03/25 11:34am 发表的内容：
您说的用DEBUG运行是指什么啊?是说用win32-debug吗?我就是用win32－debug运行的

先说一下, 用VISUAL FORTRAN的HELP 查办错误代码6201就知道是什么错了.
用DEBUG不是一句话能说清楚的. 我很少用VISUAL FORTRAN的DEBUG 功能, 现在手头电脑没装. 所以不容易说清楚.
其实也不是太复杂, 先要编译成DEBUG VERSION. 然后在PROJECT SETTING里设置好运行目录和选项, 再按F5就开始DEBUG. 出现RUN TIME ERROR, 光标会停在出错那句上, 你还可以查看没个变量数值.

Evan

对负数开平方了。

neco

下面引用由anyone在 2005/03/25 11:52am 发表的内容：
先说一下, 用VISUAL FORTRAN的HELP 查办错误代码6201就知道是什么错了.
用DEBUG不是一句话能说清楚的. 我很少用VISUAL FORTRAN的DEBUG 功能, 现在手头电脑没装. 所以不容易说清楚.
其实也不是太复杂, 先要编译成 ...

正确方法