%test_vitesses
ici=pwd;

figure
%cd E:\Gatti2\golts\Valor\Valor070405\
cd d:\golts\Survey\golts_2003\
load TGS0320skaphi.mat
%load Glts6_160_skaphi.mat
x=(1:1:nEnsembles)';
zc=(-244:4:-8)'; 
eastCurrentComponent=eastCurrentComponent/100;
northCurrentComponent=northCurrentComponent/100;
speedCurrentComponent=speedCurrentComponent/100;

pcolor(speedCurrentComponent')
%shading interp
c2=colorbar;
ylabel(['module'])
eval(['title([''GOLTS June 2003 - TGS0317skaphi.mat''])'])


figure
xx=4;
yy=6;
zz='a';

 cd d:\golts\Survey\Survey110603\ADCPTethys\tronca
 eval(['load g0603tr',int2str(xx),'t',int2str(yy),zz,'t.mat;'])
% cd e:\Gatti2\golts\Valor\Valor070405\ADCPTethys\transect
% eval(['load v0405tr',int2str(xx),'t',int2str(yy),zz,'.mat;'])
cd (ici)
[ampl,angle]=umod(uv(1:2:end-1,:),uv(2:2:end,:));
amplimin=min(min(ampl));
amplimax=max(max(ampl))
[ind1,ind2]=find(ampl==amplimax)

pcolor(ampl)
colorbar
ylabel(['module'])
eval(['title([''GOLTS g0603tr',int2str(xx),'t',int2str(yy),zz,' skaphi''])'])

figure
pcolor(angle)
colorbar
ylabel('angle')

figure
pcolor(uv(2:2:end,:))
colorbar
ylabel('v')

figure
pcolor(uv(1:2:end-1,:))
colorbar
ylabel('u')

% figure
% xx=1;
% yy=4;
% zz='a';
% 
% cd e:\Gatti2\golts\Survey\Survey291102\ADCPTethys\tronca
% eval(['load g1202tr',int2str(xx),'t',int2str(yy),zz,'t.mat;'])
% cd (ici)
% [ampl,angle]=umod(uv(1:2:end-1,:),uv(2:2:end,:));
% amplimin=min(min(ampl));
% amplimax=max(max(ampl));
% [ind1,ind2]=find(ampl==amplimax);
% 
% pcolor(ampl)
% %caxis([amplimin amplimax])
% %shading interp,
% c3=colorbar;
% %set(c3,'ytick',[0:0.5:3],'yticklabel',[0 0.5 1 1.5 2 2.5 3])
% ylabel(['module'])
% text(min(xyt(:,2))+0.01,-200,'amplitude');
% eval(['title([''GOLTS g1202tr tronca''])'])
% 
% cd (ici)