- 积分
- 116
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2015-7-10
- 最后登录
- 1970-1-1
|
登录后查看更多精彩内容~
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
这是gs
'reinit'
'open F:\newwork\shiQ\wrfout_d02_2017-03-24.ctl'
'enable print F:\newwork\shiQ\shiQ.gmf'
'define hgtc=hgt.1'
*'define u=uwnd.2'
*'define v=vwnd.3'
'define ug= -9.8*cdiff(hgtc,y)/(111177*cdiff(lat,y))'
'define vg= 9.8*cdiff(hgtc,x)/(111177*cdiff(lon,x)*cos(lat*3.1415/180))'
'define dugdx=cdiff(ug,x)/(111177*cdiff(lon,x)*cos(lat*3.1415/180))'
'define dvgdx=cdiff(vg,x)/(111177*cdiff(lon,x)*cos(lat*3.1415/180))'
'define dtdx=cdiff(hgtc,x)/(111177*cdiff(lon,x)*cos(lat*3.1415/180))'
'define dugdy= cdiff(ug,y)/(111177*cdiff(lat,y))'
'define dvgdy= cdiff(vg,y)/(111177*cdiff(lat,y))'
'define dtdy= cdiff(hgtc,y)/(111177*cdiff(lat,y))'
'define qx=(-287.05/lev)*(dugdx*dtdx+dvgdx*dtdy)*100000000000000'
'define qy=(-287.05/lev)*(dugdy*dtdx+dvgdy*dtdy)*100000000000000'
'define div=hdivg(qx,qy)*100000'
'set mpdset cnworld'
'set map 15 4 15'
'set grads off'
'set grid off'
'set lev 850'
'set lon 112 120'
'set lat 22 33'
'set t 3'
'set gxout contour'
'set ccolor 2'
'set cthick 2'
'set clab forced'
'set clskip 1'
'set cint -1e+09'
'd div'
'set gxout barb'
'set ccolor 1'
'd skip(u,16,16);skip(v,16,16)'
*'d u;v'
'set mpdset cnriver'
'set map 3 1 8'
'draw map'
'draw title 26MAY2014_700hPa_Q'
'printim F:\newwork\shiQ\shiQ.png white x1200 y800'
'reinit'
gs是在论坛里找的
做出来的图片是这样的 ,不知道哪里错了,求大家帮忙
|
-
|