--- MITgcm_contrib/enderton/Diagnostics/DiagSlice.m 2005/02/02 15:38:21 1.2 +++ MITgcm_contrib/enderton/Diagnostics/DiagSlice.m 2005/06/28 21:33:52 1.4 @@ -102,12 +102,10 @@ data=data(:,:,1)'; xax=Ylat; yax=ZC; pltslc='lathgt'; end elseif isequal(datasize(1:2),[length(XL),length(YL)]) - if ismember(fln,{'U','V','uVel','vVel'}) + if ~isequal(pst,'Lin') data = squeeze(mean(data,1))'; xax=YL; yax=ZC; pltslc='lathgt'; - elseif ismember(fln,{'TX','TY','USTR','VSTR'}) - data = squeeze(mean(data,1))'; xax=YL; yax=NaN; pltslc='latfld'; else - error(['Unknown field for U,V type zonal average data: ',fln]); + data = squeeze(mean(data,1))'; xax=YL; yax=NaN; pltslc='latfld'; end else error('Incorrect dimensions for slc = ''Zon'''); @@ -150,7 +148,7 @@ elseif isequal(slc(1:2),'k=') kk = str2num(slc(3:end)); data = squeeze(data(:,:,kk)); - if ismember(fln,{'U','V','uVel','vVel'}) + if ismember(fln,{'U','V','uVel','vVel','fizhi_U','fizhi_V'}) data = data'; xax = XL; yax = YL; elseif ismember(pst,{'Grd','Int'}) if isequal(pst,'Grd'), @@ -187,4 +185,4 @@ catch disp(['***Warning*** No range information found for ',fln]); disp([' Data range: ',mat2str(datarange)]); -end \ No newline at end of file +end