%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
%This Function Calculates the Kaiser Parameters %
%Inputs are AL Asl and Delta ML                 %
%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%

function [N,B] = kaiser_parameters(Asl,delta_ML)

N = ceil(((24*pi*(Asl+12))/(155*(delta_ML)))+1);

if Asl < 13.26
    B = 0;
end

if (Asl >= 13.26) & (Asl<60)
    B = .76609*(Asl-13.26)^.4+.09834*(Asl-13.26);
end


if (Asl >60) & (Asl<120)
    B = .12438*(Asl+6.3)
end
