% plottrlong.m
% plot transects UU (haut) et VV (bas) avec echelles independantes
% y = long
% cree par AP le 10/09/02

% xx numero de station depart
% yy numero de station fin
% zz lettre pour indiquer si c'est le a: 1er passage, b 2e etc...

eval(['load g0603tr',int2str(xx),'t',int2str(yy),zz,'.mat;'])

ax1=axes('position',[0.2 0.5 0.6 0.4]); 
pcolor(xyt(:,1),zc,flipud(uv(1:2:end,:)))
shading interp, colorbar
set(gca,'XTickLabel',[])
eval(['title([''GOLTS June 2002 - Transect ',int2str(xx),' to ',int2str(yy),' ',zz,'.''])'])

ax2=axes('position',[0.2 0.06 0.6 0.4]);
pcolor(xyt(:,1),zc,flipud(uv(2:2:end,:)))
shading interp, colorbar