% maketr_0904.m
% permet de créer les fichiers *.mat correspondant aux transects
% de la campagne Golts de Jun02 à partir des fichiers tet0904aXX.txt et
% tet0904goltsXX.txt
% from AP le 10/09/02
% modifié par JG

zc=(-244:4:-8)'; % d'apres ConfigADCP du fichier .mat

for xx=12:13

cd E:\Gatti2\golts\Valor\Valor040904\ADCPTethys\transect
eval(['load tet0904a',int2str(xx),'.txt'])
eval(['xytold=tet0904a',int2str(xx),';'])
eval(['load tet0904golts',int2str(xx),'.txt'])
eval(['uvold=tet0904golts',int2str(xx),';'])

if xx==12
   xyt=xytold(:,1:115)';
   uv=uvold(1:115,:)'/100; % pour avoir en m/s
   save v0904tr03t1a.mat xyt uv zc
   
   xyt=xytold(:,115:203)';
   uv=uvold(115:203,:)'/100; % pour avoir en m/s
   
end

if xx==13
   xyt(90:338,:)=xytold(:,1:249)';
   uv(:,90:338)=uvold(1:249,:)'/100;
   save v0904tr1t6a.mat xyt uv zc
   
   clear xyt uv
   
   xyt=xytold(:,249:587)';
   uv=uvold(249:587,:)'/100; % pour avoir en m/s
   uv(23:26,121)=NaN;
   uv(55:58,122)=NaN;
   uv(53:58,123)=NaN;
   uv(:,27)=NaN;
   uv(21:26,106)=NaN;
   uv(33:38,123)=NaN;
   uv(17:18,117)=NaN;
   uv(23:26,119)=NaN;
   uv(27:28,120)=NaN;
   save v0904tr6t7a.mat xyt uv zc
   
   xyt=xytold(:,588:922)';
   uv=uvold(588:922,:)'/100; % pour avoir en m/s
   uv(33:34,1)=NaN;
   uv(45:48,335)=NaN;
   save v0904tr7t6a.mat xyt uv zc
   
   xyt=xytold(:,922:1052)';
   uv=uvold(922:1052,:)'/100; % pour avoir en m/s
   uv(45:48,1)=NaN;
   uv(:,75)=NaN;
   uv(5:8,21)=NaN;
   save v0904tr6t4a.mat xyt uv zc
   
   xyt=xytold(:,1052:1259)';
   uv=uvold(1052:1259,:)'/100; % pour avoir en m/s
   save v0904tr4t9a.mat xyt uv zc
   
   xyt=xytold(:,1259:1461)';
   uv=uvold(1259:1461,:)'/100; % pour avoir en m/s
   save v0904tr9t4a.mat xyt uv zc
   
   xyt=xytold(:,1461:1762)';
   uv=uvold(1461:1762,:)'/100; % pour avoir en m/s
   save v0904tr4t01a.mat xyt uv zc
   
   clear xyt uv xytold uvold 
end
end