/[MITgcm]/MITgcm_contrib/osse/utils/dispens.m
ViewVC logotype

Diff of /MITgcm_contrib/osse/utils/dispens.m

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

revision 1.1 by afe, Tue Jun 15 14:42:30 2004 UTC revision 1.3 by afe, Fri Jun 18 16:23:52 2004 UTC
# Line 1  Line 1 
1  z=15;  z=15;
 ensvar=memu;  
 %ensvar=memv;  
 %ensvar=memw;  
 %ensvar=memp;  
2    
3    
4  xframe=6;  xframe=6;
5  yframe=5;  yframe=5;
 var=reshape(ensvar,[nx ny nz nens]);  
6    
7  for i=1:nens  for j=1:varnum
8    subplot(yframe,xframe,i);    var=reshape(mem(:,j,:),[nx ny nz nens]);
9    imagesc(var(:,:,z,i));colorbar;    figure(j);
10    title(sprintf('%s%i','member ',i));    for i=1:nens
11        subplot(yframe,xframe,i);
12        imagesc(var(:,:,z,i));colorbar;
13        title(sprintf('%s%i','member ',i));
14      end
15  end  end
   
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.22