/[MITgcm]/MITgcm/utils/matlab/displaytiles.m
ViewVC logotype

Contents of /MITgcm/utils/matlab/displaytiles.m

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


Revision 1.3 - (show annotations) (download)
Thu Sep 15 20:07:45 2005 UTC (18 years, 5 months ago) by jmc
Branch: MAIN
CVS Tags: HEAD
Changes since 1.2: +0 -0 lines
FILE REMOVED
moved from utils/matlab to utils/matlab/cs_grid.

1 function [] = displaytiles(A)
2 % Display tiled field.
3 %
4 % Dimensions of A must be (n,n,6)
5
6 global cmin cmax
7 clf
8
9 if size(A,3)==1
10 A=tiles(A,1:6);
11 end
12
13 cmin=min(min(min(A)));
14 cmax=max(max(max(A)));
15 if isnan(cmin)
16 cmin = 0;
17 end
18 if isnan(cmax)
19 cmax = 1;
20 end
21 if cmin==cmax
22 cmax = cmin+1;
23 end
24
25 subplot(3,4,9)
26 myplot(A(:,:,1)')
27 subplot(3,4,10)
28 myplot(A(:,:,2)')
29 subplot(3,4,6)
30 myplot(A(:,:,3)')
31 subplot(3,4,7)
32 myplot(A(:,:,4)')
33 subplot(3,4,3)
34 myplot(A(:,:,5)')
35 subplot(3,4,4)
36 myplot(A(:,:,6)')
37
38
39 %Colorbar
40 subplot(3,10,30)
41 x=[0 1];
42 y=(0:63)'/63*(cmax-cmin)+cmin;
43 pcol(x,y,[y y]);
44 set(gca,'XTickLabel',[]);
45
46 function [] = myplot( Q )
47 global cmin cmax
48 pcol( Q );
49 caxis([cmin cmax])

  ViewVC Help
Powered by ViewVC 1.1.22