--- MITgcm_contrib/enderton/Diagnostics/DiagSlice.m	2005/01/31 15:43:27	1.1
+++ MITgcm_contrib/enderton/Diagnostics/DiagSlice.m	2005/06/28 21:33:52	1.4
@@ -1,6 +1,6 @@
 function [data,xax,yax,pltslc] = ...
-    DiagSlice(data,fln,exp,dat,dad,grd,itr,tst,...
-              flu,ddf,gdf,avg,slc,pst,LoadGridData,GridSuffix,ZcordFile);
+    DiagSlice(data,fln,trl,dat,dad,grd,itr,tst,flu,ddf,gdf,...
+              avg,slc,pst,LoadGridData,GridSuffix,ZcordFile);
 
 % Function: DiagSlice
 % Author:   Daniel Enderton
@@ -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