hsolpsav.m

关于数字信号处理的一些matlab例程

function [y]=hsolpsav(x,h,N)
x=2^(ceil(log10(N)/log10(2));
lenx=length(x);
M=length(h);
M1=M-1;L=N-M1;
h=fft(h,N);
x=[zeros(1,M1),x,zeros(1,N-1)];
k=floor((lenx+M1-1)/(L));
Y=zeros(K+1,N);
for k=0:k
xk=fft(x(k*L+1:k*L+N));
Y(k+1,:)=real(ifft(xk.*h));
end
Y=Y(:,M:M)';Y=(Y(:))';