/[MITgcm]/MITgcm_contrib/heimbach/cs_adj_advdiff/results_ad/myplotcube.m
ViewVC logotype

Annotation of /MITgcm_contrib/heimbach/cs_adj_advdiff/results_ad/myplotcube.m

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


Revision 1.1 - (hide annotations) (download)
Tue May 9 20:44:40 2006 UTC (19 years, 2 months ago) by heimbach
Branch: MAIN
First reference result for CS adjoint calculation.

1 heimbach 1.1
2     xcg=rdmds('XG');
3     ycg=rdmds('YG');
4     xcs=rdmds('XC');
5     ycs=rdmds('YC');
6    
7     BBB=rdmds('adxx_theta.0000000000');
8    
9     AAA=squeeze(BBB(:,:,1));
10    
11     missing = 0.;
12     [xxx,yyy] = find(AAA==missing);
13     nnn = length(xxx);
14     for iii = 1:nnn
15     AAA(xxx(iii),yyy(iii)) = NaN;
16     end
17    
18     grph_CS(AAA,xcs,ycs,xcg,ycg,0,0,0)
19    
20     title('cubed-spere adv.-diff. adjoint: adxx\_theta')
21    
22     filename= [ 'cs_advdiff_adjoint_adxx_theta' ]
23     %%%eval([ 'print -depsc ', filename ])

  ViewVC Help
Powered by ViewVC 1.1.22