- 积分
- 241
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2015-4-27
- 最后登录
- 1970-1-1
|
登录后查看更多精彩内容~
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
首先是基于先找点,再写入新的文件,最后画图的思想。
首先一个时次,计算两点之间多个点的经纬度,然后再写入二进制文件,在画图。下面是我的gs和ctl文件以及一张实验图,不知道对不对。
- 'reinit'
- 'sdfopen E:\uwnd.nc'
- 'set gxout fwrite '
- 'set fwrite E:\uwnd.dat'
- 'set grads off'
- 'set zlog on'
- 'set csmooth on'
- 'set t 1 20'
- lon1 = 70.0
- lon2 = 120.0
- lat1 = 50.0
- lat2 = 25.0
- lon = lon1
- while (lon <= lon2)
- lat = lat1 + (lat2-lat1)*(lon-lon1) / (lon2-lon1)
- 'set lat 'lat''
- 'set lon 'lon''
- 'a=u'
- 'set y 1'
- 'set lon 'lon''
- 'd a'
- lon = lon + 0.5
- endwhile
- 'disable fwrite '
- 'c'
- 'reinit '
- ;
复制代码- dset F:\Obliqueprofile\uwnd.dat
- undef 9999
- title grid data
- xdef 101 linear 60 0.5
- ydef 1 linear 20 0.5
- zdef 1 linear 1000 10
- tdef 20 linear jan2003 1yr
- vars 1
- xie 0 99 xie data
- endvars
复制代码
|
|