function [sta,dtjpl,t,n,e,u,sn,se,su,sen,snu,seu]=Readenv3(file)
% [sta,dtjpl,t,n,e,u,sn,se,su,sen,snu,seu]=Readenv3(file)

fid=fopen(file);
if fid~=-1
    C=textscan(fid,'%s %s %f %f %f %f %f %f %f %f %f %f %f %f %f %f %f %f %f %f','Headerlines',1);
    fclose(fid);
    
    sta=C{1};
    dtjpl=C{2};
    
    t=C{3};
    
    e0=C{8};   
    e=C{9};  
    e=e+e0;
    n0=C{10};  
    n=C{11}; 
    n=n+n0;
    
    u0=C{12};      
    u=C{13}; 
    u=u+u0;
    
    se=C{15};
    sn=C{16};
    su=C{17};
        
    cen=C{18};
    ceu=C{19};
    cnu=C{20};
    
    sen = cen.*se.*sn;
    snu = cnu.*sn.*su;
    seu = ceu.*se.*su;
    
else
    sta=[];
    dtjpl=[];
    t=[];
    n=[];
    e=[];
    u=[];
    se=[];
    sn=[];
    su=[];
    sen=[];
    snu=[];
    seu=[];
end
