|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?注册
x
在附件中的Fortran程序中,第51-60行有一个文件读入语句:
OPEN(2,FILE=';f';,FORM=';UNFORMATTED';)
READ (2) (F(I),I=1,NEQ)
CLOSE (2)
open(22,FILE=';f1.dat';,FORM=';FORMATTED';)
write (22,*) (F(I),I=1,NEQ)
CLOSE (22)
c write(*,*)';f=';,f
DO I=1,NEQ
U(I)=F(I)
enddo
在DEBUG时,我发现数组U(I)的元素的值全为NAN,我在ENDDO后面设置了一个断点来跟踪是
否文件读入有问题,跟踪后发现,F(I)的值也为NAN,这时我想可能是OPEN语句要打开的对
象文件';f';有问题,为了检测该数据文件是否有问题,我在READ语句后面加入了一个写语句
,让它输出一个有格式文件f1.dat。结果发现,f1.dat文件中却写入成功,也就是说,REA
D语句已经成功从文件f中读入了数据,那为什么F(I)的值为NAN?请高手指点一二,不胜感
激。附件中是程序文件solv.for及数据文件f。 |
|