氣候變化及其診斷實習(xí)報告(更新版)
【正文】 (i)end doFF=hy/(cy/(N2))print(39。,),FFwrite(4,200)(y2(i),i=1,N)200 format()end subroutine（3）程序運行結(jié)果：回歸方程為： Y= F=實習(xí)五（1）實習(xí)目的：根據(jù)數(shù)據(jù)，對海溫場做EOF分析，畫出第一特征向量及其時間系數(shù)，并分析其時空特征。)sx=0sy=0do i =1,Nread(2,*) x(i)read(3,*) y(i)sx=sx+x(i)sy=sy+y(i)end do avex=sx/Navey=sy/Ncall f(x,y,avex,avey)end program!求回歸方程subroutine f(x,y,avex,avey)implicit none parameter N=17,P=integer i,x(N)real avex,avey,y(N),sxy,sx2,b,a,m,y2(N),cy,hy,FFsxy=0sx2=0do i=1,Nsxy=sxy+(x(i)avex)*(y(i)avey)sx2=sx2+(x(i)avex)**2end dosxy=sxy/Nsx2=sx2/Nb=sxy/sx2a=aveyb*avexm=a+b*Pprint(39。但是南京站降水量明顯比上海站降水量大。7月份標(biāo)準(zhǔn)差場上圖是500hpa高度場1982年7月要素標(biāo)準(zhǔn)差場分布圖，從圖中可以分析出：該要素緯向分布無明顯連續(xù)的變化趨勢，呈現(xiàn)多個中心，在62E，17N，132E，7N和103E，40N處分別存在一個低值中心，在90E，15N處存在一個略微高于周圍區(qū)域的高值中心，在140E~150E，25N處存在一個明顯的高值中心，在150E，40N處呈現(xiàn)最高值等值線。binary39。binary39。f:/sx/h500/39。（2）程序：program dlimplicit none parameter N=37,M=17,nyr=4,nmon=12real h(N,M,nmon,nyr),s(N,M,nmon),qh(N,M,nmon),bzc(N,M,nmon,nyr),jp(N,M,nmon,nyr)integer ix,iy,it,ittopen(1,file=39。,form=39。,form=39。7月份氣候場上圖是500hpa高度場1982年7月要素氣候場分布圖，從圖中可以分析出：在緯度35N~40N的地區(qū)，該要素氣候場沿緯向趨勢平緩，且自西向東越密集，在中低緯地區(qū)，沿緯向差異較大，變化顯著，60E~90E地區(qū)值明顯小于90E~150E區(qū)域的值。在105E，40N處的等值線值明顯是區(qū)域中最大的。d:/sx/39。*x39。
環(huán)評公示相關(guān)推薦
鄂ICP備17016276號-1