function []=mitgcm_plot_adju_128(fil,cc); gcmfaces_global; if isempty(whos('fil')); %cd MITgcm/verification/adjustment.128x64x1/run; grid_load('./',1,'straight'); cc=[-1000:100:1000]/20; suf='Eta'; num=1; figureL; set(gcf,'Renderer','zbuffer'); for tt=0:8:24; 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);