- 积分
- 188
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2019-11-26
- 最后登录
- 1970-1-1
|
登录后查看更多精彩内容~
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
fi=addfile(filename,"r")
u=fi->$uname$(0,{-20.0:40.0},{40.0:180.0})
v=fi->$vname$(0,{-20.0:40.0},{40.0:180.0})
PRECC=fi->$Pname$(0,{-20.0:40.0},{40.0:180.0})
printVarSummary(u)
printVarSummary(v)
printVarSummary(PRECC)
;************************************************
; set default res
; res1 for gsn_csm_contour
; rea2 for gsn_csm_xy
;************************************************
wks = gsn_open_wks ("pdf", case+date) ; open workstation
res = True
res@gsnMaximize = True
res@vcMinFracLengthF = 1.0
res@vcRefMagnitudeF = 3.0
res@vcRefLengthF = 0.045
res@vcGlyphStyle = "CurlyVector"
res@gsnDraw = False
res@gsnFrame = False
res@gsnLeftString = ""
res@gsnRightString = ""
res@vcMinDistanceF = 0.02
res@vcLevelPalette = "ncl_default"
res@pmTickMarkDisplayMode ="Always"
res@tiMainString = "example"
plot=gsn_csm_vector(wks,u,v,res)
;create contour plot
resCN = True
resCN@cnFillOn = True
resCN@cnLinesOn = False
resCN@gsnSpreadColors = True
resCN@gsnDraw = False
resCN@pmTickMarkDisplayMode ="Always"
base=gsn_csm_contour(wks,PRECC,resCN)
;overlay vector plot onto contour plot
overlay(base,plot)
draw(base);draw the combined obj
frame(wks);advance the frame
end
|
|