% test_nord
% programme utile pour détecter le long d'une section bateau
% quand le courant devient ouest
clear
cd e:\Gatti2\golts\Survey\Survey081203\ADCPTethys\tronca
load g1203tr9t2at.mat
u=uv(1:2:end-1,:);
for p=1:60
    ind=find(u(p,:)<0);
    if isempty(ind)==0
        minu=min(ind);
        indmin(p)=minu;
    else
        display(['ind vide à la prof ',num2str(p)])
        indmin(p)=NaN;
    end
end
indf=min(indmin);
indp=find(indmin==indf);