14 |
% compare baseline, downslope, and bbl |
% compare baseline, downslope, and bbl |
15 |
colormap(cmap), cx=[29.99 30.1]; |
colormap(cmap), cx=[29.99 30.1]; |
16 |
s1=zeros(25,15,25); s2=s1; s3=s1; |
s1=zeros(25,15,25); s2=s1; s3=s1; |
17 |
for ts=216:216:21600 |
for ts=216:216:7200 |
18 |
s1(:,:,1:25)=35+readbin(['run/SALTanom.' myint2str(ts,10) '.data'],[25 15 25]); |
s1(:,:,1:25)=35+readbin(['run/SALTanom.' myint2str(ts,10) '.data'],[25 15 25]); |
19 |
s2(:,:,1:25)=35+readbin(['run.down_slope/SALTanom.' myint2str(ts,10) '.data'],[25 15 25]); |
s2(:,:,1:25)=35+readbin(['run.down_slope/SALTanom.' myint2str(ts,10) '.data'],[25 15 25]); |
20 |
s3(:,:,1:25)=35+readbin(['run.bbl/SALTanom.' myint2str(ts,10) '.data'],[25 15 25]); |
s3(:,:,1:25)=35+readbin(['run.bbl/SALTanom.' myint2str(ts,10) '.data'],[25 15 25]); |
30 |
mypcolor(lat,-dpt/1e3,squeeze(s3(10,:,:))'); caxis(cx), thincolorbar |
mypcolor(lat,-dpt/1e3,squeeze(s3(10,:,:))'); caxis(cx), thincolorbar |
31 |
title(['bbl salinity section on day ' int2str(ts*1200/60/60/24)]) |
title(['bbl salinity section on day ' int2str(ts*1200/60/60/24)]) |
32 |
hold on, plot(lat,-Depth(10,:)/1e3,'r.-'), ylabel('depth (km)') |
hold on, plot(lat,-Depth(10,:)/1e3,'r.-'), ylabel('depth (km)') |
33 |
xlabel('latitude (deg)'), pause(.1) |
xlabel('latitude (deg)'), pause(.5) |
34 |
end |
end |
35 |
|
|
36 |
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%% |
37 |
% look at some diagnostics from bbl integration |
% look at some diagnostics from bbl integration |
38 |
for ts=216:216:21600 |
for ts=216:216:7200 |
39 |
s1=35+readbin(['run.bbl/SALTanom.' myint2str(ts,10) '.data'],[25 15 25]); |
s1=35+readbin(['run.bbl/SALTanom.' myint2str(ts,10) '.data'],[25 15 25]); |
40 |
clf, subplot(321), mypcolor(lat,-dpt/1e3,squeeze(s1(10,:,:))'); caxis(cx), thincolorbar |
clf, subplot(321), mypcolor(lat,-dpt/1e3,squeeze(s1(10,:,:))'); caxis(cx), thincolorbar |
41 |
title(['salinity section on day ' int2str(ts*1200/60/60/24)]) |
title(['salinity section on day ' int2str(ts*1200/60/60/24)]) |
61 |
RAC(i,j)=RAC(i,j)*hFacC(i,j,kbot(i,j)); |
RAC(i,j)=RAC(i,j)*hFacC(i,j,kbot(i,j)); |
62 |
end |
end |
63 |
end |
end |
64 |
for ts=216:216:21600 |
for ts=216:216:7200 |
65 |
eta=readbin(['run.bbl/BBLeta.' myint2str(ts,10) '.data'],[25 15]); |
eta=readbin(['run.bbl/BBLeta.' myint2str(ts,10) '.data'],[25 15]); |
66 |
tendS=readbin(['run.bbl/BBLtendS.' myint2str(ts,10) '.data'],[25 15]); |
tendS=readbin(['run.bbl/BBLtendS.' myint2str(ts,10) '.data'],[25 15]); |
67 |
tmp=RAC.*tendS; |
tmp=RAC.*tendS; |