clear;
close('all');
fclose('all');

read_parameters_Stratus; %Reading parameter files flux conf from D:/data/lb/flux_eval_rhb_06
plotit=1;
prtit=1;
ddd=input('Input yearday to evaluate.... ');

R=input('Confirm parameters (yes/no) ?......','s');
C=strcmp(R,'yes');
if C==1

    read_pc_day_Stratus_07;    
    read_son_day_Stratus_07;
    read_motion_Stratus_07;
    read_gps_day_Stratus_07;
    read_co2_Stratus_07;

    disp('  ');
    disp('%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%');
    disp('<<<<<<<<         END of Flux_eval_program       >>>>>>>>>>>>>>>>>>>>>>>');
    disp('%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%');


else   
    disp(['Go into the file ' fnpar ' to change the parameters']);
end;
