function [leg,hilo,st,et]=rflookup_lidar(RF_num,timestamp)

start=timestamp;
ender=timestamp+1000; %ten minutes later


% inputs
% RF_num = string for the flight number (ie. 'rf08');
% timestamp = radar starttime

% output
% leg is the leg number
% hilo determines if it was a high or low leg
% iter tells the iteration number of the leg (default 1);


%%

if strcmp('rf01',RF_num);
    
    fname='uwka20110405.c1.nc'
    out_nm='RF01';
    leg_num=[1     ;2     ;3     ;4     ;5     ;6     ;1     ;2     ];
    is_low =[0     ;0     ;0     ;0     ;0     ;0     ;1     ;1     ];
    st_tm  =[151800;153600;155300;160700;162600;164700;174100;180500];
    en_tm  =[153000;155000;160400;162100;163800;170000;175400;181600];
    
    
    index=find(((start>= st_tm) & (start <= en_tm)) | (ender >= st_tm & ender <= en_tm));
    st=st_tm(index);
    et=en_tm(index);
    leg=leg_num(index);
    lo=is_low(index);
    if lo==1
        hilo='low';
    else
        hilo='high';
    end
    
elseif strcmp('rf03',RF_num);
    
    
    fname='uwka20110409.c1.nc'
    out_nm='RF03';
    leg_num=[1     ;2     ;1     ;2     ;3     ;4     ;5     ;5     ;
        7;     6];
    is_low =[1     ;1     ;0     ;0     ;0     ;0     ;0     ;1     ;
        0;     0];
    st_tm  =[154500;160300;162600;164400;170000;171500;173300;175000;181400;183000];
    en_tm  =[155800;161800;163900;165800;171200;172800;174600;180400;182800;184300];
    dl_tm  =[165100];
    index=find((start>= st_tm & start <= en_tm) | (ender >= st_tm & ender <= en_tm));
    st=st_tm(index);
    et=en_tm(index);
    leg=leg_num(index);
    lo=is_low(index);
    if lo==1
        hilo='low';
    else
        hilo='high';
    end
elseif strcmp('rf04',RF_num);
    
    
    fname='uwka20110410.c1.nc'
    out_nm='RF04';
    leg_num=[1     ;2     ;1     ;2     ;3     ;4     ;5     ;5     ;
        6;     7];
    is_low =[1     ;1     ;0     ;0     ;0     ;0     ;0     ;1     ;
        0;     0];
    st_tm  =[141400;143200;145400;151200;152800;154300;160100;161700;164100;165700];
    en_tm  =[142700;144700;150700;152600;154100;155600;161400;163200;165500;171000];
    dl_tm  =[143900];
    index=find((start>= st_tm & start <= en_tm) | (ender >= st_tm & ender <= en_tm));
    st=st_tm(index);
    et=en_tm(index);
    leg=leg_num(index);
    lo=is_low(index);
    if lo==1
        hilo='low';
    else
        hilo='high';
    end
elseif strcmp('rf05',RF_num);
    
    fname='uwka20110414.c1.nc'
    out_nm='RF05';
    leg_num=[1     ;2     ;1     ;2     ;3     ;4     ;5     ;5     ;
        6;     7];
    is_low =[1     ;1     ;0     ;0     ;0     ;0     ;0     ;1     ;
        0;     0];
    st_tm  =[153300;155100;161400;163300;165000;170600;172400;174100;180500;182100];
    en_tm  =[154600;160600;162700;164700;170230;171900;173700;175600;181900;183400];
    dl_tm  =[155800];
    index=find((start>= st_tm & start <= en_tm) | (ender >= st_tm & ender <= en_tm));
    st=st_tm(index);
    et=en_tm(index);
    leg=leg_num(index);
    lo=is_low(index);
    if lo==1
        hilo='low';
    else
        hilo='high';
    end
elseif strcmp('rf06',RF_num);
    
    
    fname='uwka20110415.c1.nc'
    out_nm='RF06';
    leg_num=[1     ;2     ;1     ;2     ;3     ;4     ;5     ;     6;     7];
    is_low =[1     ;1     ;0     ;0     ;0     ;0     ;1     ;     0;     0];
    st_tm  =[143000;145100;151500;153200;155000;162300;164100;170600;172300];
    en_tm  =[144400;150700;152700;154700;160300;163600;165600;172000;173600];
    dl_tm  =[145900];
    ref_vec1=100;
    ref_vec2=75;
    index=find((start>= st_tm & start <= en_tm) | (ender >= st_tm & ender <= en_tm));
    st=st_tm(index);
    et=en_tm(index);
    leg=leg_num(index);
    lo=is_low(index);
    if lo==1
        hilo='low';
    else
        hilo='high';
    end
elseif strcmp('rf07',RF_num);
    
    fname='uwka20110418.c1.nc'
    out_nm='RF07';
    leg_num=[1     ;2     ;1     ;2     ;3     ;4     ];
    is_low =[1     ;1     ;0     ;0     ;0     ;0     ];
    st_tm  =[155700;161600;163800;165700;171800;173500];
    en_tm  =[161100;163000;165100;171100;173100;174700];
    T_leg_num=[3     ;4     ;3     ;4     ];
    T_leg_ind=[2     ;2     ;3     ;3     ];
    T_st_tm  =[175100;180800;182500;184100];
    T_en_tm  =[180400;182100;183800;185400];
    index=find((start>= st_tm & start <= en_tm) | (ender >= st_tm & ender <= en_tm));
    st=st_tm(index);
    et=en_tm(index);
    leg=leg_num(index);
    lo=is_low(index);
    if lo==1
        hilo='low';
    else
        hilo='high';
    end
    
elseif strcmp('rf08',RF_num);
    fname='uwka20110419.c1.nc'
    out_nm='RF08';
    leg_num=[1     ;2     ;1     ;2     ;3     ;4     ];
    is_low =[1     ;1     ;0     ;0     ;0     ;0     ];
    st_tm  =[142800;144700;151000;152900;154600;160300];
    en_tm  =[144100;150100;152300;154300;155900;161600];
    T_leg_num=[3     ;4     ;3     ;4     ];
    T_leg_ind=[2     ;2     ;3     ;3     ];
    T_st_tm  =[162000;163700;165400;171100];
    T_en_tm  =[163300;165000;170700;172400];
    index=find((start>= st_tm & start <= en_tm) | (ender >= st_tm & ender <= en_tm));
    st=st_tm(index);
    et=en_tm(index);
    leg=leg_num(index);
    lo=is_low(index);
    if lo==1
        hilo='low';
    else
        hilo='high';
    end
    
    
elseif strcmp('rf09',RF_num);
    fname='uwka20110421.c1.nc'
    out_nm='RF09';
    leg_num=[1     ;2     ;1     ;2     ;3     ;4     ;5     ];
    is_low =[1     ;1     ;0     ;0     ;0     ;0     ;1     ];
    st_tm  =[144400;150300;152600;154500;160300;161900;171200];
    en_tm  =[145700;151800;153800;155900;161500;163200;172400];
    T_leg_num=[3     ;4     ];
    T_leg_ind=[2     ;2     ];
    T_st_tm  =[163600;165200];
    T_en_tm  =[165200;170500];
    index=find((start>= st_tm & start <= en_tm) | (ender >= st_tm & ender <= en_tm));
    st=st_tm(index);
    et=en_tm(index);
    leg=leg_num(index);
    lo=is_low(index);
    if lo==1
        hilo='low';
    else
        hilo='high';
    end
    
elseif strcmp('rf10',RF_num);
    fname='uwka20110424.c1.nc'
    out_nm='RF10';
    leg_num=[1     ;2     ;1     ;2     ;3     ;4     ;5     ;5     ];
    is_low =[1     ;1     ;0     ;0     ;0     ;0     ;1     ;0     ];
    st_tm  =[163100;165000;171400;173300;175000;180600;185900;191700];
    en_tm  =[164400;170500;172700;174600;180300;181900;191300;193000];
    T_leg_num=[3     ;4     ];
    T_leg_ind=[2     ;2     ];
    T_st_tm  =[182200;183900];
    T_en_tm  =[183600;185100];
    index=find((start>= st_tm & start <= en_tm) | (ender >= st_tm & ender <= en_tm));
    st=st_tm(index);
    et=en_tm(index);
    leg=leg_num(index);
    lo=is_low(index);
    if lo==1
        hilo='low';
    else
        hilo='high';
    end
elseif strcmp('rf11',RF_num);
    fname='uwka20110425.c1.nc'
    out_nm='RF11';
    leg_num=[1     ;2     ;1     ;2     ;3     ;4     ;5     ;5     ];
    is_low =[1     ;1     ;0     ;0     ;0     ;0     ;1     ;0     ];
    st_tm  =[143200;145100;151400;153200;154900;160500;170000;171600];
    en_tm  =[144500;150600;152600;154600;160200;161800;171300;173000];
    T_leg_num=[3     ;4     ];
    T_leg_ind=[2     ;2     ];
    T_st_tm  =[162100;163700];
    T_en_tm  =[163400;165000];
    index=find((start>= st_tm & start <= en_tm) | (ender >= st_tm & ender <= en_tm));
    st=st_tm(index);
    et=en_tm(index);
    leg=leg_num(index);
    lo=is_low(index);
    if lo==1
        hilo='low';
    else
        hilo='high';
    end
    
    
elseif strcmp('rf12',RF_num);
    fname='uwka20110426.c1.nc'
    out_nm='RF12';
    leg_num=[1     ;2     ;1     ;2     ;3     ;4     ;5     ;5     ];
    is_low =[1     ;1     ;0     ;0     ;0     ;0     ;1     ;0     ];
    st_tm  =[131200;133000;135400;141200;143000;144500;154100;155800];
    en_tm  =[132400;134500;140600;142600;144200;145900;155400;161200];
    T_leg_num=[3     ;4     ];
    T_leg_ind=[2     ;2     ];
    T_st_tm  =[150200;151700];
    T_en_tm  =[151400;153000];
    index=find((start>= st_tm & start <= en_tm) | (ender >= st_tm & ender <= en_tm));
    st=st_tm(index);
    et=en_tm(index);
    leg=leg_num(index);
    lo=is_low(index);
    if lo==1
        hilo='low';
    else
        hilo='high';
    end
    
elseif strcmp('rf13',RF_num);
    %fname='uwka20110427.c1.nc'
    %out_nm='RF13';
    leg_num=[1     ;2     ;1     ;2     ;3     ;4     ;5     ;5     ];
    is_low =[1     ;1     ;0     ;0     ;0     ;0     ;1     ;0     ];
    st_tm  =[141900;143800;150100;152000;153800;155400;164900;170600];
    en_tm  =[143200;145300;151400;153500;155100;160700;170200;172000];
    T_leg_num=[3     ;4     ];
    T_leg_ind=[2     ;2     ];
    T_st_tm  =[161100;162700];
    T_en_tm  =[162300;164000];
    
    index=find((start>= st_tm & start <= en_tm) | (ender >= st_tm & ender <= en_tm));
    st=st_tm(index);
    et=en_tm(index);
    leg=leg_num(index);
    lo=is_low(index);
    if lo==1
        hilo='low';
    else
        hilo='high';
    end
    
    
    
elseif strcmp('rf14',RF_num);
    fname='uwka20110428.c1.nc';
    out_nm='RF14';
    leg_num=[1     ;2     ;3     ;4     ;6     ;8     ;7     ];
    is_low =[0     ;0     ;0     ;0     ;0     ;0     ;0     ];
    st_tm  =[170600;172400;174200;175700;185500;190600;191900];
    en_tm  =[171900;173800;175400;181100;190300;191600;192800];
    T_leg_num=[3;     4];
    T_leg_ind=[2;     2];
    T_st_tm  =[181400;183000;];
    T_en_tm  =[182600;184400;];
    index=find((start>= st_tm & start <= en_tm) | (ender >= st_tm & ender <= en_tm));
    st=st_tm(index);
    et=en_tm(index);
    leg=leg_num(index);
    lo=is_low(index);
    if lo==1
        hilo='low';
    else
        hilo='high';
    end
elseif strcmp('rf15',RF_num);
    leg_num=[1     ;2     ;1     ;2     ;3     ;4     ;6     ;7     ;8 ;5     ];
    is_low =[1     ;1     ;0     ;0     ;0     ;0     ;0     ;0     ;0 ;1     ];
    st_tm  =[145900;151800;154100;155900;161600;163100;172300;173200;174200;175800];
    en_tm  =[151200;153300;155300;161300;162900;164500;173000;173900;174800;181300];
    T_leg_num=[3     ;4     ];
    T_leg_ind=[2     ;2     ];
    T_st_tm  =[164800;170400];
    T_en_tm  =[170000;171500];
    index=find((start>= st_tm & start <= en_tm) | (ender >= st_tm & ender <= en_tm));
    if index
        index=index(1,1);
    end
    st=st_tm(index);
    et=en_tm(index);
    leg=leg_num(index);
    lo=is_low(index);
    if lo==1
        hilo='low';
    else
        hilo='high';
    end
elseif strcmp('rf16',RF_num);
    leg_num=[1     ;2     ;1     ;2     ;3     ;4     ;6     ;7     ;8; 5     ];
    is_low =[1     ;1     ;0     ;0     ;0     ;0     ;0     ;0     ;0; 1     ];
    st_tm  =[145300;151100;153400;155200;161000;162500;172200;173100;174200;175600];
    en_tm  =[150500;152600;154700;160700;162200;163900;172800;173900;174700;181000];
    T_leg_num=[3     ;4     ];
    T_leg_ind=[2     ;2     ];
    T_st_tm  =[164200;165800];
    T_en_tm  =[165400;171100];
    
    index=find((start>= st_tm & start <= en_tm) | (ender >= st_tm & ender <= en_tm));
    st=st_tm(index);
    et=en_tm(index);
    leg=leg_num(index);
    lo=is_low(index);
    if lo==1
        hilo='low';
    else
        hilo='high';
    end
elseif strcmp('rf17',RF_num);
    leg_num=[1     ;2     ;1     ;2     ;3     ;4     ;6     ;7     ;8     ];
    is_low =[1     ;1     ;0     ;0     ;0     ;0     ;0     ;0     ;0     ];
    st_tm  =[142600;144500;150800;152600;154300;155900;165600;170400;171400];
    en_tm  =[143900;150000;152100;154000;155600;161200;170200;171100;172000];
    T_leg_num=[3     ;4     ];
    T_leg_ind=[2     ;2     ];
    T_st_tm  =[161600;163100];
    T_en_tm  =[162800;164400];
    
    index=find((start>= st_tm & start <= en_tm) | (ender >= st_tm & ender <= en_tm));
    st=st_tm(index);
    et=en_tm(index);
    leg=leg_num(index);
    lo=is_low(index);
    if lo==1
        hilo='low';
    else
        hilo='high';
    end
elseif strcmp('rf17',RF_num);
    leg_num=[1     ;2     ;1     ;2     ;3     ;4     ;5     ;5     ];
    is_low =[1     ;1     ;0     ;0     ;0     ;0     ;1     ;0     ];
    st_tm  =[141600;143500;145700;151600;153400;155000;164200;165900];
    en_tm  =[142900;145000;151000;153000;154700;160300;165600;171300];
    T_leg_num=[3     ;4     ];
    T_leg_ind=[2     ;2     ];
    T_st_tm  =[160600;162200];
    T_en_tm  =[161900;163500];
    
    index=find((start>= st_tm & start <= en_tm) | (ender >= st_tm & ender <= en_tm));
    st=st_tm(index);
    et=en_tm(index);
    leg=leg_num(index);
    lo=is_low(index);
    if lo==1
        hilo='low';
    else
        hilo='high';
    end
    
end