GrADS實(shí)習(xí)報(bào)告范文

實(shí)驗(yàn)（實(shí)習(xí)）報(bào)告6專(zhuān)業(yè)大氣科學(xué)年級(jí)14班級(jí)1姓名錢(qián)亞楠學(xué)號(hào)2346079實(shí)驗(yàn)?zāi)康?.掌握氣象要素互相影響研究的基本辦法。2.進(jìn)一步鞏固FORTRAN次序構(gòu)造和循環(huán)構(gòu)造的程序設(shè)計(jì)辦法和變量，函數(shù)，數(shù)組的使用辦法，重點(diǎn)掌握外部文獻(xiàn)對(duì)數(shù)據(jù)進(jìn)行輸入輸出操作的辦法。3.掌握FORTRAN中WLF函數(shù)庫(kù)的使用辦法。4.理解站點(diǎn)資料的數(shù)據(jù)構(gòu)造。5.掌握站點(diǎn)資料數(shù)據(jù)描述文獻(xiàn)和站點(diǎn)映射文獻(xiàn)的建立辦法。6.掌握站點(diǎn)資料生成格點(diǎn)資料的辦法。7.學(xué)習(xí)并掌握GrADS函數(shù)的使用辦法，加強(qiáng)對(duì)oacres(),maskout(),smth()等函數(shù)的理解。8.掌握GrADS變量的定義和使用辦法。9.鞏固GrADS數(shù)據(jù)解決流程，繪圖要素設(shè)立，基礎(chǔ)繪圖命令的使用辦法，進(jìn)一步掌握描述語(yǔ)言的應(yīng)用辦法。二.問(wèn)題描述（1）問(wèn)題分析三．實(shí)驗(yàn)環(huán)節(jié)四．實(shí)驗(yàn)核心及辦法（1）計(jì)算1951-1月蒙古高壓強(qiáng)度與中國(guó)氣溫同期有關(guān)Ptcor01.f90USEWFLinteger,parameter::n=60,start=1951character*10char1integeriinteger(4)station,nstationreala(n),b(n),c(160,n),d(n),e(n),coopen(1,file='D:\p.dat',form='formatted')open(2,file='D:\t1601.txt',form='formatted')open(3,file='D:\mh-t-1.dat',form='formatted')open(4,file='D:\mh-t-1.grd',form='binary')read(1,*)(a(i),i=1,n)close(1)read(2,*)((c(i,j),i=1,160),j=1,n)close(2)doi=1,160doj=1,60b(j)=c(i,j)enddocallCOR2(n,a,b,co,colev)write(3,'(f12.5)')cowrite(4)coenddoclose(3)close(4)End站點(diǎn)數(shù)據(jù)轉(zhuǎn)換成格點(diǎn)數(shù)據(jù)Cor-stntogrd.f90USEWFLinteger,parameter::n=60,start=1951character*10char1integeriinteger(4)station,nstationreala(n),b(n),c(160,n),d(n),e(n),coopen(1,file='D:\p.dat',form='formatted')open(2,file='D:\t1601.txt',form='formatted')open(3,file='D:\mh-t-1.dat',form='formatted')open(4,file='D:\mh-t-1.grd',form='binary')read(1,*)(a(i),i=1,n)close(1)read(2,*)((c(i,j),i=1,160),j=1,n)close(2)doi=1,160doj=1,60b(j)=c(i,j)enddocallCOR2(n,a,b,co,colev)write(3,'(f12.5)')cowrite(4)coenddoclose(3)close(4)End生成160站的格點(diǎn)文獻(xiàn)grid.f90programmainparameter(nx=71,ny=41)reallat(ny),lon(nx)reals(nx,ny)open(1,file='D:\data\grid.grd',form='binary')lat(1)=15.0lon(1)=70.0doj=1,ny-1lat(j+1)=lat(j)+1.0enddodoi=1,nx-1lon(i+1)=lon(i)+1.0enddodoi=1,nxdoj=1,nys(i,j)=1enddoenddowrite(1)sclose(1)end編寫(xiě)“mh-t-gr.grd”的數(shù)據(jù)描述文獻(xiàn)mh-t-gr.ctldsetD:\data\mh-t-gr.grddtypestationstnmapD:\data\china.mapundef-999.0titleCorrelationoftandmhtdef1linearJAN19511monvars1r099correlationofmhpandtEndvars編寫(xiě)“grid.grd”的數(shù)據(jù)描述文獻(xiàn)Grid.ctldsetD:\data\grid.grdundef-999.0titleSampleGRIDDataxdef71linear701ydef41linear151zdef1linear10001tdef1linearJAN19511monvars1gd099griddatapreparedforoacresfunctionEndvars繪制1951-1月蒙古高壓強(qiáng)度與中國(guó)氣溫同期有關(guān)圖ptcor1.gs'reinit''openD:\grid.ctl''openD:\mh-t-gr.ctl''setmap111''setlon72.5137.5''setlat17.555''sett1''setmpdsethirescnworld''setgridoff''setgradsoff''definea=oacres(gd,r.2,1.5)''definea1=maskout(a,gd-0.5)''defineaa=smth9(a1)''setgxoutshaded''setxlopts160.15''setylopts160.15''setclopts060.12''setclevs-0.418-0.333-0.2560.2560.3330.418''setccols4370734''daa''setgxoutcontour''setclabforced''setcthick8''daa''runD:\southsea.gs''setmpdsetcnriver''setmap218''drawmap''printimD:\ptcor.pngwhite';1951-1月蒙古高壓強(qiáng)度與中國(guó)氣溫同期有關(guān)圖實(shí)驗(yàn)總結(jié)學(xué)習(xí)并掌握了同期有關(guān)系數(shù)的求解辦法，運(yùn)用函數(shù)求1951-1月蒙古高壓強(qiáng)度與中國(guó)氣溫同期有關(guān)的160個(gè)有