clear all

% missions = ['2000.055.23/'; '2000.055.24/'; '2000.056.00/'; '2000.056.04/'; '2000.056.05/'];
% save missions missions

% [N x] = size(missions);

% for M = 1:N;
%  eval(['cd ' missions(M,:)]);
%  clear missions;
 dataCTD; save dataCTD; clear all; 
 dataGPS; save dataGPS; clear all; 
 dataN; save dataN; clear all; 
 dataD; save dataD; clear all;
 biolume; save biolume; clear all
%  cd ..;  load missions;
% end

% rm */*{.log,.m}
