/[MITgcm]/MITgcm_contrib/bbl/lookat_output.m
ViewVC logotype

Annotation of /MITgcm_contrib/bbl/lookat_output.m

Parent Directory Parent Directory | Revision Log Revision Log | View Revision Graph Revision Graph


Revision 1.2 - (hide annotations) (download)
Mon Nov 22 22:29:55 2010 UTC (14 years, 7 months ago) by dimitri
Branch: MAIN
Changes since 1.1: +46 -24 lines
updating matlab plotting routine for slightly fancier diagnostics

1 dimitri 1.1 % cd ~/mitgcm/bbl/MITgcm
2 dimitri 1.2 lon=0:.48:11.6; lat=-70:.16:-67.7; dpt=72:144:3600;
3     Depth=readbin('run/Depth.data',[25 15]);
4     colormap(cmap), cx=[29.99 30.1];
5    
6     % find bottom
7     kbot=ones(25,15);
8     s1=35+readbin(['run.bbl/SALTanom.' myint2str(216,10) '.data'],[25 15 25]);
9     for k=2:25
10     kbot(find(s1(:,:,k)>0))=k;
11     end
12 dimitri 1.1
13     %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
14     % compare baseline, downslope, and bbl
15 dimitri 1.2 colormap(cmap), cx=[29.99 30.1];
16     s1=zeros(25,15,25); s2=s1; s3=s1;
17 dimitri 1.1 for ts=216:216:21600
18 dimitri 1.2 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]);
20     s3(:,:,1:25)=35+readbin(['run.bbl/SALTanom.' myint2str(ts,10) '.data'],[25 15 25]);
21 dimitri 1.1 clf, subplot(311)
22 dimitri 1.2 mypcolor(lat,-dpt/1e3,squeeze(s1(10,:,:))'); caxis(cx), thincolorbar
23 dimitri 1.1 title(['baseline salinity section on day ' int2str(ts*1200/60/60/24)])
24 dimitri 1.2 hold on, plot(lat,-Depth(10,:)/1e3,'r.-'), ylabel('depth (km)')
25 dimitri 1.1 subplot(312)
26 dimitri 1.2 mypcolor(lat,-dpt/1e3,squeeze(s2(10,:,:))'); caxis(cx), thincolorbar
27 dimitri 1.1 title(['downslope salinity section on day ' int2str(ts*1200/60/60/24)])
28 dimitri 1.2 hold on, plot(lat,-Depth(10,:)/1e3,'r.-'), ylabel('depth (km)')
29 dimitri 1.1 subplot(313)
30 dimitri 1.2 mypcolor(lat,-dpt/1e3,squeeze(s3(10,:,:))'); caxis(cx), thincolorbar
31 dimitri 1.1 title(['bbl salinity section on day ' int2str(ts*1200/60/60/24)])
32 dimitri 1.2 hold on, plot(lat,-Depth(10,:)/1e3,'r.-'), ylabel('depth (km)')
33     xlabel('latitude (deg)'), pause(.1)
34 dimitri 1.1 end
35    
36     %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
37     % look at some diagnostics from bbl integration
38     for ts=216:216:21600
39     s1=35+readbin(['run.bbl/SALTanom.' myint2str(ts,10) '.data'],[25 15 25]);
40 dimitri 1.2 clf, subplot(321), mypcolor(lat,-dpt/1e3,squeeze(s1(10,:,:))'); caxis(cx), thincolorbar
41 dimitri 1.1 title(['salinity section on day ' int2str(ts*1200/60/60/24)])
42     s2=kbot; for i=1:25, for j=1:15, s2(i,j)=s1(i,j,kbot(i,j)); end, end
43 dimitri 1.2 subplot(322), mypcolor(s2'); caxis(cx), thincolorbar
44     title('salinity of bottom grid box')
45 dimitri 1.1 s3=readbin(['run.bbl/BBLsalt.' myint2str(ts,10) '.data'],[25 15]);
46 dimitri 1.2 subplot(323), mypcolor(s3'); caxis(cx), thincolorbar
47     title('salinity of bbl')
48 dimitri 1.1 subplot(324), mypcolor(s3'-s2'); thincolorbar
49     title('bbl salinity minus bottom salinity')
50 dimitri 1.2 tendS=readbin(['run.bbl/BBLtendS.' myint2str(ts,10) '.data'],[25 15]);
51     subplot(325), mypcolor(tendS'); caxis([-1 1]*3e-9), thincolorbar
52     title('bottom salinity tendency due to bbl'), pause(.1)
53     end
54    
55     %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
56     % check that tendency integrates to zero
57     RAC=readbin('run.bbl/RAC.data',[25 15]);
58     hFacC=readbin('run.bbl/hFacC.data',[25 15 25]);
59     for i=1:25
60     for j=1:15
61     RAC(i,j)=RAC(i,j)*hFacC(i,j,kbot(i,j));
62     end
63     end
64     for ts=216:216:21600
65     eta=readbin(['run.bbl/BBLeta.' myint2str(ts,10) '.data'],[25 15]);
66     tendS=readbin(['run.bbl/BBLtendS.' myint2str(ts,10) '.data'],[25 15]);
67     tmp=RAC.*tendS;
68     disp([ts sum(tmp(:))]), pause(1)
69 dimitri 1.1 end

  ViewVC Help
Powered by ViewVC 1.1.22