%
% Purpose:  Process all of the data
%

%for i=1:length(dirArray)
for i=21:27

  dirArray = [...
  '2001.286.00';
  '2001.286.01';
  '2001.286.02';
  '2001.286.03';
  '2001.286.04'; %5
  '2001.286.05';
  '2001.286.06';
  '2001.286.07';
  '2001.286.08';
  '2001.289.01';  %10
  '2001.289.03';  %First under ice - the long one with IPS off
  '2001.290.06';
  '2001.290.08';  %Second long under ice run.
  '2001.291.12';  %Long (538 cm) Vehicle
  '2001.292.08';  %15;Depth env. abort.
  '2001.292.09';  %Out and back
  '2001.292.10';  %Out and back
  '2001.296.09';  %First attempted buoy launch; straight, then circle;15min;50m
  '2001.296.10';  %Unreachable waypoint test;10 min,30m
  '2001.296.11';  %20; Waypoint test, 14min, 25m
  '2001.297.03';  %Yoyo out; no ice/ips, depth 500m, down near Svalbard
  '2001.297.04';  %Yoyo out; no ice/ips, depth 500m
  '2001.297.05';  %Yoyo out; no ice/ips, depth 500m
  '2001.298.00';  %1350 meter triange partially under ice, ips active, 30 m
  '2001.298.03';  %25;1350 meter triange partially under ice, ips active, 30 m
  '2001.298.05';  %1350 meter triange partially under ice, ips active, 30 m
  '2001.298.06';  %500 m North, 2500m @ 120, 2400m @ 250, yoyos to 50 m.
  ];
  eval(['cd ../',dirArray(i,:)])
  close all
  clear all
  pwd
  loadData
  loadDataSci
  process
  save('sci')
end