第2章 数据处理精选文档.ppt
《第2章 数据处理精选文档.ppt》由会员分享,可在线阅读,更多相关《第2章 数据处理精选文档.ppt(32页珍藏版)》请在淘文阁 - 分享文档赚钱的网站上搜索。
1、第2章 数据处理本讲稿第一页,共三十二页2.1 各类数据格式的特点各类数据格式的特点n一般二进制无格式直接或者顺序一般二进制无格式直接或者顺序记录的数据格式:可以是格点数记录的数据格式:可以是格点数据或站点数据,可以用据或站点数据,可以用Fortran或者或者C语言读写。语言读写。本讲稿第二页,共三十二页nGRIB码数据格式:是自定义的码数据格式:是自定义的数据格式,压缩率高,占用空数据格式,压缩率高,占用空间小。如间小。如NCEP提供的数据资料。提供的数据资料。nNETCDF等通用数据格式:自等通用数据格式:自定义数据格式,精确性好,便定义数据格式,精确性好,便于传输。于传输。本讲稿第三页,
2、共三十二页2.2 数据文件的转换数据文件的转换 1.转换方法转换方法 转换文件的数据存放格式,一转换文件的数据存放格式,一般是通过般是通过Power Station或或Visual Fortran等软件使用等软件使用Fortran或者或者C语言来编程转换。语言来编程转换。本讲稿第四页,共三十二页2.数据存放形式数据存放形式 数据排放顺序为:经度、纬度、数据排放顺序为:经度、纬度、层次,然后是物理变量,最后是层次,然后是物理变量,最后是时次变化时次变化。本讲稿第五页,共三十二页3.举例(格点资料)举例(格点资料)现有现有ASCII码(十进制存放格式)数据资码(十进制存放格式)数据资料文件料文件u
3、.dat、v.dat和和SST.dat,其空间范围:,其空间范围:60-150E,0-40N;层次:;层次:u、v为为850、200hPa;时段:;时段:1982.1-1985.12;分辨率:;分辨率:2.5*2.5。要求编写出将这三个文件转换成二。要求编写出将这三个文件转换成二进制无格式直接存取(进制无格式直接存取(Grads格式格式.grd)文件)文件的的Fortran程序。程序。本讲稿第六页,共三十二页Fortran程序编写如下:程序编写如下:C 定义一个定义一个X,Y,Z方向的格点数以及总时次方向的格点数以及总时次ntparameter(nx=37,ny=17,nz=2,nt=48)c
4、 定义数组定义数组dimension u(nx,ny,nz,nt),v(nx,ny,nz,nt),sst(nx,ny,nt)本讲稿第七页,共三十二页c 打开原始数据文件打开原始数据文件open(1,file=u.dat)open(2,file=v.dat)open(3,file=sst.dat)c 打开目标文件,打开目标文件,recl为记录的长度,对于直接存取为记录的长度,对于直接存取文件必须指定记录长度文件必须指定记录长度。open(12,file=mhy.grd,form=unformatted,#access=direct,recl=nx*ny*4)本讲稿第八页,共三十二页c按一定格式把
5、数据文件读入,按一定格式把数据文件读入,irec为记录累加器为记录累加器irec=0 do 100 it=1,nt do 50 iz=1,nz irec=irec+1 read(1,rec=irec)(u(i,j,iz,it),i=1,nx),j=1,ny)50 continue do 51 iz=1,nz irec=irec+1 read(2,rec=irec)(v(i,j,iz,it),i=1,nx),j=1,ny)51 continue irec=irec+1 read(3,rec=irec)(sst(i,j,it),i=1,nx),j=1,ny)100 continue 本讲稿第九页,
6、共三十二页c 将数据资料写入新文件中,将数据资料写入新文件中,irec重新进行记录累重新进行记录累irec=0 do 200 it=1,nt do 30 iz=1,nz irec=irec+1 write(12,rec=irec)(u(i,j,iz,it),i=1,nx),j=1,ny)30 Continue do 31 iz=1,nz irec=irec+1 write(12,rec=irec)(v(i,j,iz,it),i=1,nx),j=1,ny)31 continue irec=irec+1 write(12,rec=irec)(sst(i,j,it),i=1,nx),j=1,ny)2
7、00 continueend本讲稿第十页,共三十二页如果不考虑采用无格式直接方式存取文如果不考虑采用无格式直接方式存取文件的话,可以使用下面的编程形式,较为简件的话,可以使用下面的编程形式,较为简单。单。parameter(nx=37,ny=17,nz=2,nt=48)dimension u(nx,ny,nz,nt),#v(nx,ny,nz,nt),sst(nx,ny,nt)open(1,file=u.dat)open(2,file=v.dat)open(3,file=sst.dat)open(12,file=mhy.grd,form=binary)本讲稿第十一页,共三十二页do 100 it
8、=1,nt do 50 iz=1,nz read(1,*)(u(i,j,iz,it),i=1,nx),j=1,ny)50 continue do 51 iz=1,nzread(2,*)(v(i,j,iz,it),i=1,nx),j=1,ny)51 continueread(3,*)(sst(i,j,it),i=1,nx),j=1,ny)100 continue本讲稿第十二页,共三十二页do 200 it=1,nt do 30 iz=1,nz write(12)(u(i,j,iz,it),i=1,nx),j=1,ny)30 Continue do 31 iz=1,nzwrite(12)(v(i,
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 第2章 数据处理精选文档 数据处理 精选 文档
限制150内