%***************************************************************************
%  parsen2 - Parsen2 window                    DAVID HORAK          5.5.1998
%***************************************************************************
function g=parsen2(N,q)

t=(-N/2:N/2);
for i=1:N+1
 g(i)=1/(1+(abs(t(i))/(N/2))^q);
end

%plot(g);

