--- MITgcm_contrib/enderton/Diagnostics/DiagSliceGradsData.m 2005/01/31 15:43:27 1.1 +++ MITgcm_contrib/enderton/Diagnostics/DiagSliceGradsData.m 2005/09/05 18:48:27 1.3 @@ -1,5 +1,5 @@ function [data,xax,yax,pltslc] = ... - DiagSliceGradsData(fln,flu,slc,data,xaxin,yaxin,zaxin,time); + DiagSliceGradsData(fln,flu,slc,data,xaxin,yaxin,zaxin); % Function: DiagSliceGradsData % Author: Daniel Enderton @@ -22,7 +22,7 @@ DiagFieldParamI; if isequal(slc,'Sur') - data = squeeze(data(:,:,1,:)); + data = data'; xax = xaxin; yax = yaxin; pltslc='lonlat'; @@ -34,7 +34,7 @@ yax=NaN; pltslc='latfld'; else - yax=ZC; + yax=zaxin; pltslc='lathgt'; end @@ -63,7 +63,7 @@ elseif isequal(slc(1:2),'k=') kk = str2num(slc(3:end)); - data = squeeze(data(:,:,kk,:)); + data = squeeze(data(:,:,kk,:))'; xax = xaxin; yax = yaxin; pltslc='lonlat'; @@ -90,4 +90,4 @@ catch disp(['***Warning*** No range information found for ',fln]); disp([' Data range: ',mat2str(datarange)]); -end \ No newline at end of file +end