% This script makes a plot of velocities from the TMS3 calibration.
% The objective is to contrast characteristics of the flow in the center
% and on the edges of the channel.  The velocity averaged over the UVM
% measurement path is compared with the estimate of the velocity in
% the edges which are missed by the ADCP transects.
% RWB, October 29, 1999.

   clf
   plot(run.vavtsec/86400,run.vavuvm,'-b')
   hold on
   plot(run.vavtsec/86400,run.vavedge,'or')
   title('Three-Mile Slough, June 2','fontsize',18)
   xlabel('Day of June, 1998','fontsize',14)
   ylabel('average velocities (m/s)','fontsize',14)

   t0=run.vavtsec(1)/86400;
   t1=run.vavtsec(length(run.vavtsec))/86400;
   dt=t1-t0;
   xl=zeros(1,2);
   xl(1)=t0-dt/20;
   xl(2)=t1+dt/20;
   dx=xl(2)-xl(1);
   yl=ylim;
   dy=yl(2)-yl(1);
   xlim(xl);
   legend('predicted UVM velocity','edge velocity',0);

   print -djpeg -r40 ...
   /Users/faculty/bland/public_html/research/si3dmod/p91029a.jpg
   print -djpeg -r20 ...
   /Users/faculty/bland/public_html/research/si3dmod/p91029a.jpg