fortran severe（24）的问题

cjjj

最开始的资料是uwnd.sig995.2003.nc（见附件），查询得出它的ctl是：
dset XX
tite XX
undef XX
xdef 144 linear 0 2.5
ydef 73 linear -90 2.5
zdef 1 linear 0 0
tdef 365 linear 00Z01JAN2003 1440mn
vars 1
uwnd 0 -999 XX


用uwnd.fwrite.gs：
'reinit'
t=2003
while(t<=2012)
'set gxout fwrite'
'set fwrite F:\uwnd.sig995.'%t%'.grd'
'sdfopen F:\uwnd.sig995.'%t%'.nc'

'd uwnd'
'disable fwrite'

'reinit'
t=t+1
endwhile
'reinit'
;

写出了uwnd.sig995.2003.grd（见附件，是批量写出的其中一个）
用zhaoBandpass.for（见附件）运行，错误是

forrtl: severe (24): end-of-file during read, unit 11, file f:\uwnd.sig995.2003.
grd
Image              PC        Routine            Line        Source
zhaoBandpass.exe   0040B229  Unknown               Unknown  Unknown
zhaoBandpass.exe   0040B087  Unknown               Unknown  Unknown
zhaoBandpass.exe   0040A264  Unknown               Unknown  Unknown
zhaoBandpass.exe   0040A699  Unknown               Unknown  Unknown
zhaoBandpass.exe   00405949  Unknown               Unknown  Unknown
zhaoBandpass.exe   004011D1  Unknown               Unknown  Unknown
zhaoBandpass.exe   00435F19  Unknown               Unknown  Unknown
zhaoBandpass.exe   0041B489  Unknown               Unknown  Unknown
kernel32.dll       7C817077  Unknown               Unknown  Unknown

Incrementally linked image--PC correlation disabled.
Press any key to continue

在网上查了一下，解答如下：
“读数据时读到文件末尾了。
说明你要读的数据多于文件中存储的数据，改一下程序中读取数据的个数

你这好像是执行时的错误，不是编译时的。
end-of-file during read,unit2,file:\era40\era73\t.dat 大概表示读文件t.dat 已经到文件末尾，你的程序还要读，所以出错。所以检查t.dat 的实际内容和相关读语句。

说明你要读的数据多于文件中存储的数据，改一下程序中读取数据的个数。
这个错误一般是有循环语句，导致每次都读取数据，而初始文件里只有一个数据可读。
此时需要修改程序，让程序只读一次数据。
”

不过我还是不知道怎么改，要是能解释一下原因就更好了，谢谢啦~~~~~~

lqouc

表示懒得去下载你的附件，难道就不能直接贴上来？而且人家已经告诉你很清楚了，没法再仔细说了，假如给你个数据就10行，非让你告诉我第11行写的什么，你怎么办？？？只好报错了呗。
人家也都告诉你怎么改了，别说不会啊，就是手懒。循环不会改就在read里面加一个iostat。
而且最根本的问题就不在于你的fortran。gs写的就不对。文件时间不循环，空间维数不设置，怎么能输出正确数据。

river

亲，你的gs就是错的，你要是不会用set fwrite还是先去看看手册或者书吧，要不论坛相关的帖子也行

♂雨已~○

哎，基础知识啊

cjjj

lqouc 发表于 2013-5-11 18:14

                               
登录/注册后可看大图

表示懒得去下载你的附件，难道就不能直接贴上来？而且人家已经告诉你很清楚了，没法再仔细说了，假如给你个 ...

谢谢~谢谢~

cjjj

river 发表于 2013-5-11 20:03

                               
登录/注册后可看大图

亲，你的gs就是错的，你要是不会用set fwrite还是先去看看手册或者书吧，要不论坛相关的帖子也行

谢谢~谢谢~

cjjj

♂雨已~○ 发表于 2013-5-12 11:10

                               
登录/注册后可看大图

哎，基础知识啊

确实基础不好。。。

That_gal

lz这个问题解决了吗？同遇到这个问题，pause了一下，我刚打开文件开始读第一行就读不下去了

~兵临城下~

只是小问题，积分不多，不下载了，去看教程吧。

cjjj

~兵临城下~ 发表于 2014-6-27 10:06
只是小问题，积分不多，不下载了，去看教程吧。

自己解决问题的同学最可爱~