disp('***********************START**************************************** ')
disp(['OPEN DATA FILES FOR DAY ',num2str(ddd),' and HOUR ',num2str(hhh)]),
%      opencamp1;     %1    Channel 1
opencamp1r2;     %1    Channel 1          13 fields
%rain=0;opencampn;     %1    Channel 1            12 fields  
clear CO2 H2O KGillAzu KGillBot KGillTop Tdry Twet lyman tcamp Tref
%openmotion;    %2    Channel 5
%      clear accx accy accz ratex ratey ratez tmotion
opengyro2;      %6    Channel 3
openmotion2;    %2    Channel 5
openship2;      %7    Channel 6
openradiom2;    %8    Channel 2
opensons2;      %3    Channel 0
%      clear Tsonic su sv sw tsons
%      clear heading tgyro
%openophir2;     %4    Channel 4
abshum=(1:length(tmotion)).*0;
stdC_1=0;stdC_2=0;stdC_3=0;stdC_4=0;stdC_5=0;stdC_6=0;
stdA_1=0;stdA_2=0;stdA_3=0;stdA_4=0;stdA_5=0;stdA_6=0;
medC_1=0;medC_2=0;medC_3=0;medC_4=0;medC_5=0;medC_6=0;
medA_1=0;medA_2=0;medA_3=0;medA_4=0;medA_5=0;medA_6=0;
fastexrate;
%humflux;
clear Oabsorb Oclear tophir 
clear specsize     
%      opengps;       %5    Channel 7
%      clear gpshead gpshour gpslat gpslon gpsmin gpssec gpsspeed
clear ship_Tair ship_Tsea ship_cog ship_gyro ship_hum ship_sog
clear LongIR1 LongIR2 RHv Solar1 Solar2 Tairv Tsea_snake
disp(['         COMPLETED DAY ',dfx1,'  HOUR ',dfx2]),
disp('***********************END**************************************** ')
