Warning, /utils/matlab/cs_grid/displaytiles.m is written in an unsupported language. File is not indexed.
view on githubraw file Latest commit 4ec37fd8 on 2023-10-03 22:00:32 UTC
83ce4d2aa6 Alis*0001 function [] = displaytiles(A)
0002 % Display tiled field.
0003 %
0004 % Dimensions of A must be (n,n,6)
f8d374081f Jean*0005 %
0006 % Written by adcroft@.mit.edu, 2001.
83ce4d2aa6 Alis*0007 global cmin cmax
0008 clf
0009
22586ff4d2 Alis*0010 if size(A,3)==1
0011 A=tiles(A,1:6);
0012 end
0013
83ce4d2aa6 Alis*0014 cmin=min(min(min(A)));
0015 cmax=max(max(max(A)));
0016 if isnan(cmin)
0017 cmin = 0;
0018 end
0019 if isnan(cmax)
0020 cmax = 1;
0021 end
0022 if cmin==cmax
0023 cmax = cmin+1;
0024 end
0025
0026 subplot(3,4,9)
0027 myplot(A(:,:,1)')
0028 subplot(3,4,10)
0029 myplot(A(:,:,2)')
0030 subplot(3,4,6)
0031 myplot(A(:,:,3)')
0032 subplot(3,4,7)
0033 myplot(A(:,:,4)')
0034 subplot(3,4,3)
0035 myplot(A(:,:,5)')
0036 subplot(3,4,4)
0037 myplot(A(:,:,6)')
0038
0039
0040 %Colorbar
4ec37fd829 Jean*0041 %subplot(3,10,30)
0042 %x=[0 1];
0043 %y=(0:63)'/63*(cmax-cmin)+cmin;
0044 %pcolor(x,y,[y y]);
0045 %set(gca,'XTickLabel',[]);
0046 subplot(2,4,8)
0047 caxis([cmin cmax])
0048 colorbar
0049 axis off
83ce4d2aa6 Alis*0050
0051 function [] = myplot( Q )
0052 global cmin cmax
4ec37fd829 Jean*0053 pcolor( Q );
83ce4d2aa6 Alis*0054 caxis([cmin cmax])
