- 积分
- 11107
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2011-9-5
- 最后登录
- 1970-1-1
|
登录后查看更多精彩内容~
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
想利用循环提取1979-2010年冬季的数据,原始的数据是每年放在一个文件里的(1979-2011年)
这就涉及到一个跨年飞问题,下面是自己编的程序。
前一年的12月能提取,没问题。到了后一年的1-2月份,就出错 ,说超出了范围{:soso_e127:}。
请教一下各位!
谢谢{:soso_e113:}!
附程序:
************************************
'reinit'
iyr=1979
while(iyr<=2010)
iyr2=iyr+1
'open E:\tj\pre\nizi\rain'iyr'.ctl'(前一年)
'open E:\tj\pre\nizi\rain'iyr2'.ctl'(后一年)
'set gxout fwrite'
'set fwrite E:\tj\pre\nizi\winter.'iyr'.dat'
********前一年12月******************************************
'set time 01dec'iyr' 31dec'iyr''
'set x 1 142'
'set y 1 82'
'set z 1'
'd rain'
'set dfile 2'
***********后一年1-2月****************************************
'set time 01djan'iyr2' 28feb'iyr2''
'set z 1'
'set x 1 142'
'set y 1 82'
'd rain'
iyr=iyr+1
'disable fwrite'
endwhile
|
|