function  [param,edited_var,ele] = remove_ground( order_radar_variable)

[param]=read_dorade_airborne;
radar_variable = param(order_radar_variable).data;
[Rg, Ng, ele] = sfc_finder(param);
[li, col]= size(radar_variable);
c=0;
phi=param(1).az - 180;
u_above=find(phi >  180);
if length(u_above)>0
phi(u_above)=npi2pi(phi(u_above));
disp('check phi')
end
for i = 1:col
    temp=Rg(i)-param(1).rge;
    [mini,position(i)]=min(abs(temp));
    
    if (phi(i) > -90 & phi(i) < 90)
        lastgate=position(i)-Ng(i);
        if lastgate <2
            lastgate=2;
            c=c+1;
        end
        radar_variable(lastgate-1:li,i)=NaN;
        
    end
end
edited_var=radar_variable;