% reduce adcp.m - to cut out early parts of adcp contour files

% dir with newest data:
%/mnt/oc415-2a/oc415_2/adcp_data/adcp/oc415/contour/

% files: contour_xy.mat contour_uv.mat

%contour_xy variables:
%  adcpsect_time       1x24                      48  char array
%  dbname              1x15                      30  char array
%  regrid_method       1x7                       14  char array
%  regrid_var          1x5                       10  char array
%  xyt                 3x3453                 82872  double array
%  year_base           1x1                        8  double array
%  z                  45x1                      360  double array
%  z_label             1x7                       14  char array
%  zc                 44x1                      352  double array

% contour_uv variables:

%  uv       44x6906               2430912  double array

%nd=22;
%u=uv(1:nd,1:2:end);
%v=uv(1:nd,2:2:end);

% as of July 29 I sent through: 209.7516

load /mnt/oc415-2a/oc415_2/adcp_data/adcp/oc415/contour/contour_xy

aa=find(xyt(3,:) > 209.7516);

xyt=xyt(:,aa);

save new_contour_xy adcpsect_time dbname  regrid_method regrid_var ...
    xyt  year_base  z   z_label zc

load /mnt/oc415-2a/oc415_2/adcp_data/adcp/oc415/contour/contour_uv

uv=uv(:,end-length(aa)*2+1:end);
save new_contour_uv uv