- 积分
- 147
- 贡献
-
- 精华
- 在线时间
- 小时
- 注册时间
- 2018-3-2
- 最后登录
- 1970-1-1
|

楼主 |
发表于 2018-4-23 15:42:47
|
显示全部楼层
clear;
close all;
load('lon.mat');
load('lat.mat');
load('tauu.mat');
load('tauv.mat');
R=6.3781e6; % earth's radius
[lon , lat] = meshgrid(lat,lon);
[dx, ~]=gradient(lon);
dx=dx.*(pi./180).*R.*cos(lat*pi./180);
[~, dy]=gradient(lat);
dy=dy.*(pi./180).*R;
[~, du]=gradient(tauu(:,:,1,1));
[dv, ~]=gradient(tauv(:,:,1,1));
curlz=dv./dx-du./dy+tauu(:,:,1,1).*tan(lat.*pi./180)./R;
curlz(abs(lat)==90)=NaN;
contour(curlz);
这是我的代码 |
|