- 积分
- 320
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2014-3-19
- 最后登录
- 1970-1-1
|
楼主 |
发表于 2014-3-25 12:39:43
|
显示全部楼层
ctl文件:
dset f:/c/JRA25_snow/anl_snow25.%y4%m2.gr
undef 9.999E+20
title anal_snow monthly average
options template big_endian
xdef 144 linear 0.0 2.5
ydef 73 linear -90.0 2.5
tdef 390 linear 01jan1979 1mo
zdef 1 levels 1000
vars 1
SnowD 0 99 ** Surface snow depth [m]
ENDVARS
用的gs:
'reinit'
'open f:/c/JRA25_snow/anl_snow25.monthly.ctl'
'set gxout fwrite'
'set fwrite f:/c/JRA25_snow/snow25.%y4%m2.gr'
'set x 1 144'
'set y 1 73'
'set z 1'
j=1;while(j<=12)
'set t 'j
'define sunsnow=ave(SnowD,t='j',t=384,12)'
'd sunsnow'
j=j+1
endwhile
'disable fwrite'
谢谢咯 |
|