function []=mitgcm_plot_adju_cs32(fil,cc); gcmfaces_global; if isempty(whos('fil')); %cd MITgcm/verification/adjustment.cs-32x32x1/run; fprintf('\n\n grid files answer is: ''tile*.mitgrid''\n\n'); grid_load('./',6,'cube'); cc=[-1000:100:1000]/500; suf='dynDiag'; num=3; figureL; set(gcf,'Renderer','zbuffer'); for tt=22:24:190; fil={sprintf('%s.%010d',suf,tt),num}; mitgcm_plot_adju_cs32(fil,cc); pause(1); end; return; end; m=squeeze(mygrid.mskC(:,:,1)); if ~iscell(fil); c=rdmds2gcmfaces(fil); else; c=rdmds2gcmfaces(fil{1},'rec',fil{2}); end; c=c(:,:,1); clf; if isempty(whos('cc')); cc=[]; end; %gcmfaces_sphere(c.*m,cc,[],{100,20},1) qwckplot(c.*m); gcmfaces_cmap_cbar(cc); title(fil);