/[MITgcm]/MITgcm_contrib/enderton/Diagnostics/DiagSlice.m
ViewVC logotype

Diff of /MITgcm_contrib/enderton/Diagnostics/DiagSlice.m

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

revision 1.1 by enderton, Mon Jan 31 15:43:27 2005 UTC revision 1.3 by molod, Tue Mar 1 20:09:11 2005 UTC
# Line 1  Line 1 
1  function [data,xax,yax,pltslc] = ...  function [data,xax,yax,pltslc] = ...
2      DiagSlice(data,fln,exp,dat,dad,grd,itr,tst,...      DiagSlice(data,fln,trl,dat,dad,grd,itr,tst,flu,ddf,gdf,...
3                flu,ddf,gdf,avg,slc,pst,LoadGridData,GridSuffix,ZcordFile);                avg,slc,pst,LoadGridData,GridSuffix,ZcordFile);
4    
5  % Function: DiagSlice  % Function: DiagSlice
6  % Author:   Daniel Enderton  % Author:   Daniel Enderton
# Line 102  elseif isequal(slc,'Zon') Line 102  elseif isequal(slc,'Zon')
102              data=data(:,:,1)'; xax=Ylat;   yax=ZC;   pltslc='lathgt';              data=data(:,:,1)'; xax=Ylat;   yax=ZC;   pltslc='lathgt';
103          end          end
104      elseif isequal(datasize(1:2),[length(XL),length(YL)])      elseif isequal(datasize(1:2),[length(XL),length(YL)])
105          if ismember(fln,{'U','V','uVel','vVel'})          if ismember(fln,{'U','V','uVel','vVel','fizhi_U','fizhi_V'})
106              data = squeeze(mean(data,1))'; xax=YL; yax=ZC;  pltslc='lathgt';              data = squeeze(mean(data,1))'; xax=YL; yax=ZC;  pltslc='lathgt';
107          elseif ismember(fln,{'TX','TY','USTR','VSTR'})          elseif ismember(fln,{'TX','TY','USTR','VSTR'})
108              data = squeeze(mean(data,1))'; xax=YL; yax=NaN; pltslc='latfld';              data = squeeze(mean(data,1))'; xax=YL; yax=NaN; pltslc='latfld';
# Line 150  elseif isequal(slc(1:2),'j=') Line 150  elseif isequal(slc(1:2),'j=')
150  elseif isequal(slc(1:2),'k=')  elseif isequal(slc(1:2),'k=')
151      kk = str2num(slc(3:end));      kk = str2num(slc(3:end));
152      data = squeeze(data(:,:,kk));      data = squeeze(data(:,:,kk));
153      if ismember(fln,{'U','V','uVel','vVel'})      if ismember(fln,{'U','V','uVel','vVel','fizhi_U','fizhi_V'})
154          data = data'; xax = XL; yax = YL;          data = data'; xax = XL; yax = YL;
155      elseif ismember(pst,{'Grd','Int'})      elseif ismember(pst,{'Grd','Int'})
156          if isequal(pst,'Grd'),          if isequal(pst,'Grd'),
# Line 187  try Line 187  try
187  catch  catch
188      disp(['***Warning***  No range information found for ',fln]);      disp(['***Warning***  No range information found for ',fln]);
189      disp(['               Data range:  ',mat2str(datarange)]);      disp(['               Data range:  ',mat2str(datarange)]);
 end  
190    end
Legend:
Removed from v.1.1  
changed lines
  Added in v.1.3
  ViewVC Help
Powered by ViewVC 1.1.22