figure(1),clf
subplot(421),mypcolor(readbin('uwind_192_94_8.bin',[192 94])');colorbar
subplot(422),mypcolor(readbin('vwind_192_94_8.bin',[192 94])');colorbar
subplot(423),mypcolor(readbin('swdown_192_94_8.bin',[192 94])');colorbar
subplot(424),mypcolor(readbin('lwdown_192_94_8.bin',[192 94])');colorbar
subplot(425),mypcolor(readbin('precip_192_94_8.bin',[192 94])');colorbar
subplot(426),mypcolor(readbin('atemp_192_94_8.bin',[192 94])');colorbar
subplot(427),mypcolor(readbin('aqh_192_94_8.bin',[192 94])');colorbar

figure(2)
for fld={'RAZ','RAW','RAS','RA','LONG','LONC','LATG','LATC', ...
         'DYU','DYG','DYF','DYC','DXV','DXG','DXF','DXC'}
    tmp=permute(readbin([fld{1} '.bin'],[32,6,32],1,'real*8'),[1 3 2]);
    cx=[min(tmp(:)) max(tmp(:))]; clf, plot_cube, title(fld{1}), pause
end

for fld={'UWIND','VWIND','Eta','VICE','UICE','HEFF','AREA','Qsw','Qnet','FV','FU','EmPmR'}
    tmp=permute(readbin([fld{1} '.0000000020.data'],[32,6,32]),[1 3 2]);
    cx=[min(tmp(:)) max(tmp(:))]; clf, plot_cube, title(fld{1}), pause
end