找回密码
 注册
查看: 1993|回复: 1

[求助]Fortran读文件错误!

[复制链接]
发表于 2004-11-4 11:28:03 | 显示全部楼层 |阅读模式

马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。

您需要 登录 才可以下载或查看,没有账号?注册

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。
发表于 2004-11-6 01:35:12 | 显示全部楼层

[求助]Fortran读文件错误!

文件F是UNFORMATED, 也就是说用二进制存的. 如果你读的格式和写的格式略有差别就会差之千里. 最好能找到写F文件时那一段程序对比一下.
您需要登录后才可以回帖 登录 | 注册

本版积分规则

快速回复 返回顶部 返回列表