- 积分
- 1460
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2014-2-26
- 最后登录
- 1970-1-1
|
登录后查看更多精彩内容~
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
数据是9个站35年月平均相对湿度资料,由于不是一般的站点存放格式,自己做了一些处理,把站点信息(站号及经纬度)和相对湿度数据分开存放了(fortran中的rh.txt和stid.txt)
fortran读取资料:
Program sta2grd
parameter(nx=9,tt=420)
character*8 stid(9),lon(9),lat(9)
real rh(9,420),tim
integer nlev,flag
open(3,file='d:\0512\RH.txt')
open(4,file='d:\0512\stid.txt')
open(7,file='d:\0512\RH.grd',form='binary')
do i=1,nx
do j=1,tt
read(3,*)rh(i,j)
print*,rh(i,j)
enddo
enddo
do i=1,nx
read(4,*)stid(i),lat(i),lon(i)
enddo
do i=1,tt
tim=0.0
nlev=1
flag=1
do j=1,nx
write(7)stid(j),lat(j),lon(j),tim,nlev,flag,rh(I,J)
enddo
nlev=0
write(7)stid(i-1),lat(i-1),lon(i-1),tim,nlev,flag
enddo
close(7)
end
程序运行ok生成了相应的grd
ctl:
dset d:\0512\rh.grd
dtype station
stnmap d:\0512\rh.map
undef 32766
title relative humidity
tdef 420 linear JAN1979 1mo
VARS 1
rh 0 99 rhSTN data
endvars
生成站点映射文件时
打开ctl就显示open error missing xdef/ydef/zdef/tdef record。。。
看了之前一些帖子也没有什么头绪,由于刚开始做站点数据处理,不是很明白,又把这个问题放上来求助!
|
|