fortran读取二进制文件时出现错误

251764374

用grads的fwrite命令输出了365个浮点型数据。open(1,file=file1,status='old',form='binary')
do i=1,nt
        read(1,*) u(i)
enddo
close(1)file:///D:\QQ\Users\251764374\Image\C2C\I0N_P_]BO`2{H6YW%QM6_PE.jpg
读取的时候显示
run-time error F6200: READ(E:\bklw\QS_W\QS_W\rf\hou_mjo_rain\2001_iso1.dat)
- formatted I/O not consistent with OPEN options
Press any key to continue


求大神指点

file:///D:\QQ\Users\251764374\Image\C2C\I0N_P_]BO`2{H6YW%QM6_PE.jpg



[img]file:///C:\Documents and Settings\Administrator\Application Data\Tencent\Users\251764374\QQ\WinTemp\RichOle\9CG}A$R196}E)L4V8$Q7R@S.png[/img]

251764374

open(1,file=file1,status='old',form='binary',recl=4,access='direct')
do i=1,nt
        read(1,*) u(i)
enddo
close(1)
这样读取也不对

排山倒海

不知道你读入的文件时什么格式，但是既然form='binary'，那么 read(1,*) u(i)里面的*就不能带上，应该是read(1)

river

你自己的资料格式是二进制无格式的，那怎么还用读文本的方法读呢。fortran里面以什么格式写入的数据，就要以什么格式来读取。所以把你read里面的 ,* 去掉

251764374

排山倒海 发表于 2014-10-29 20:31
不知道你读入的文件时什么格式，但是既然form='binary'，那么 read(1,*) u(i)里面的*就不能带上，应该是rea ...

对哦，出来了，犯迷糊了。

lww8220064

回复下 啊啊

天涯王丹

多谢楼主无私分享