% plot_flag.m
ici=pwd;

figure
cd e:\Gatti2\golts\Survey\golts_2003\
load TGS0320aphi_new.mat
x=(1:1:nEnsembles)';
zc=(-244:4:-8)';


ax1=axes('position',[0.25 0.71 0.45 0.2]);
%set(gca,'YTick',[-250:50:0])
%set(gca,'YTickLabel',[-250 -200 -150 -100 -50 0])
%imagesc(x,zc,flipud(waterFlag'))
imagesc(waterFlag')
c1=colorbar;
eval(['title([''GOLTS December 2003 - 320aphi_-new ''])'])
set(gca,'XTickLabel',[])
ylabel(['waterFlag'])

ax2=axes('position',[0.25 0.5 0.45 0.2]);
%imagesc(x,zc,bottomFlag')
imagesc(bottomFlag')
c2=colorbar;
set(gca,'XTickLabel',[])
ylabel(['bottomFlag'])

ax3=axes('position',[0.25 0.29 0.45 0.2]);
%imagesc(x,zc,filterFlag')
imagesc(filterFlag')
c2=colorbar;
set(gca,'XTickLabel',[])
ylabel(['filterFlag'])

ax4=axes('position',[0.25 0.08 0.45 0.2]);
%imagesc(x,zc,globalFlag')
[m,n]=size(globalFlag);
c=ones(m,n);
c(globalFlag==0)=0;
imagesc(c')
c2=colorbar;
ylabel(['globalFlag'])

figure

cd e:\Gatti2\golts\Survey\golts_2003\
load TGS0320skaphi.mat

x=(1:1:nEnsembles)';
zc=(-244:4:-8)'; 

ax1=axes('position',[0.25 0.71 0.45 0.2]);
%imagesc(x,zc,waterFlag')
imagesc(waterFlag')
c1=colorbar;
eval(['title([''GOLTS December 2003 - 320skaphi''])'])
set(gca,'XTickLabel',[])
ylabel(['waterFlag'])

ax2=axes('position',[0.25 0.5 0.45 0.2]);
%imagesc(x,zc,bottomFlag')
imagesc(bottomFlag')
c2=colorbar;
set(gca,'XTickLabel',[])
ylabel(['bottomFlag'])

ax3=axes('position',[0.25 0.29 0.45 0.2]);
%imagesc(x,zc,filterFlag')
imagesc(filterFlag')
caxis([0 1])
c2=colorbar;
set(gca,'XTickLabel',[])
ylabel(['filterFlag'])

ax4=axes('position',[0.25 0.08 0.45 0.2]);
%imagesc(x,zc,globalFlag')
imagesc(globalFlag')
c2=colorbar;
ylabel(['globalFlag'])

cd (ici)

