GraDs的gs文件中close使用的疑问，有对比

aiai1992

下面是gs，我若将文件结尾处的close（4）语句加上就会出错，我很是不解！两个图分别为加与不加的提示框

'reinit'
'set gxout fwrite'
'set fwrite f:\1991-2000.grd'
yy=1991
while(yy<=2000)
'sdfopen h:\nc\hgt\hgt.'yy'.nc'
'sdfopen h:\nc\air\air.'yy'.nc'
'sdfopen h:\nc\uwnd\uwnd.'yy'.nc'
'sdfopen h:\nc\vwnd\vwnd.'yy'.nc'
'set x 43 63'
'set y 47 65'
if ((math_mod(yy,4)=0& math_mod(yy,100)!=0)| math_mod(yy,400)=0)
tt=1
while(tt<=366)
'set t 'tt''
'set z 6'
*zz=1
*while(zz<=17)
*'set z 'zz''
'd hgt.1/10'

'set z 4'
'd hgt.1/10'
'set z 6'
'd air.2-273.16'
'set z 6'
'd uwnd.3'
'set z 6'
'd vwnd.4'
*zz=zz+1
*endwhile
tt=tt+1
endwhile
else
tt=1
while(tt<=365)
'set t 'tt''
'set z 6'
*zz=1
*while(zz<=17)
*'set z 'zz''
'd hgt.1/10'

'set z 4'
'd hgt.1/10'
'set z 6'
'd air.2-273.16'
'set z 6'
'd uwnd.3'
'set z 6'
'd vwnd.4'
*zz=zz+1
*endwhile
tt=tt+1
endwhile
endif
'close 1'
'close 2'
'close 3'
*'close 4'
yy=yy+1
endwhile
'disable fwrite'

'reinit'
;

river

在grads中关闭文件和fortran中是反过来的，后打开的文件要先关闭，也就是说就你的gs来看需要以4 3 2 1的顺序关闭

aiai1992

river 发表于 2014-1-11 20:32

                               
登录/注册后可看大图

在grads中关闭文件和fortran中是反过来的，后打开的文件要先关闭，也就是说就你的gs来看需要以4 3 2 1的顺序 ...

学习了，多谢、多谢！

panghuaji

非常感谢！高手就在一指间。

txxrk

谢谢，学到知识了！

grace639

{:eb502:}原来是这样~