想用fortran将txt（类似于格点存储）转为grads可读的二进制文件，谢谢

kaiofchina

{:5_275:}

kermit

http://bbs.06climate.com/forum.php?mod=viewthread&tid=90016
我自己写的一个小程序
当然你得自己把数据重写为grads的数据储存顺序。

kaiofchina

{:5_275:}

今天开始养老

我也是这个问题，但是我的数据是按月份的

radon

简单写一段fortran程序，功能是将txt转为二进制。配合.ctl描述文件，grads就可以读取
注意grads的纬度排列默认是从南向北，如果txt文件中不是，要调顺序，或在ctl文件中标明

                integer lon,lat
                parameter(lon=72，lat=18)
                character(len=200) tempc
                real dat(lon,lat)
                integer i,j

open(110,file='SURF_CLI_CHN_TEM_DAY_GRID_0.5-MIN-20040704.txt',form='formatted',status='old',action='read')
do i=1,6
read(110,*) tempc
enddo

do j=1,lat
   read(110,*) (dat(i,j),i=1,lon)
enddo
close(110)
                open(210,file='TEM_20040704.dat',form='unformatted',access='direct',status='unknown',action='write',recl=lat*lon)
write(210,rec=1) ((dat(i,j),i=1,lon),j=1,lat)
close(210)

ifzm

等楼主解决