%plotflour.m

clear;

dir = '2016Jul12';
path = sprintf( '../%s/parsed/CPF%sFLOUR.mat',dir,dir);
load(path);

figure(1);
scatter(flbbDateTimeNum,flbbDepth,20,flbbFL,'filled')
datetick
axis('tight')
grid on
colorbar
outstr = sprintf('%s Flour sig',dir);
title(outstr);
xlabel('time');
ylabel('dbar');
set(gca,'color',[.7 .7 .7])

figure(2);
scatter(flbbDateTimeNum,flbbDepth,20,flbbBB470,'filled')
datetick
axis('tight')
grid on
colorbar
outstr = sprintf('%s 470nm backscatter sig',dir);
title(outstr);
xlabel('time');
ylabel('dbar');
set(gca,'color',[.7 .7 .7])

figure(3);
scatter(flbbDateTimeNum,flbbDepth,20,flbbBB700,'filled')
datetick
axis('tight')
grid on
colorbar
outstr = sprintf('%s 700nm backscatter sig',dir);
title(outstr);
xlabel('time');
ylabel('dbar');
set(gca,'color',[.7 .7 .7])

pos_index=1;
neg_index=1;
%mask out Flourometer neg values
for i = 1:size(flbbFL,2)
    if(flbbFL(i)>0)
        flbbFL_pos(pos_index)=flbbFL(i);
        flbbDateTimeNum_pos(pos_index)=flbbDateTimeNum(i);
        flbbDepth_pos(pos_index)=flbbDepth(i);
        pos_index = pos_index+1;
    else
        flbbFL_neg(neg_index)=flbbFL(i);
        flbbDateTimeNum_neg(neg_index)=flbbDateTimeNum(i);
        flbbDepth_neg(neg_index)=flbbDepth(i);
        neg_index = neg_index+1;
    end
end

figure(4);
scatter(flbbDateTimeNum_pos,flbbDepth_pos,20,flbbFL_pos,'filled')
datetick
axis('tight')
grid on
colorbar
outstr = sprintf('%s Flour sig positive only',dir);
title(outstr);
xlabel('time');
ylabel('dbar');
set(gca,'color',[.7 .7 .7])

figure(5);
scatter(flbbDateTimeNum_neg,flbbDepth_neg,20,flbbFL_neg,'filled')
datetick
axis('tight')
grid on
colorbar
outstr = sprintf('%s Flour sig negative only',dir);
title(outstr);
xlabel('time');
ylabel('dbar');
set(gca,'color',[.7 .7 .7])