Mercurial > hg > ishara

annotate dsp/spec2fir.m @ 32:c3b0cd708782

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Imported core dsp tools.
author samer
date Sun, 20 Jan 2013 13:48:47 +0000
parents
children
rev   line source
samer@32 1 function R=spec2fir(A)
samer@32 2 % SPEC2FIR: convert magnitude spectra to FIR filter coefficients
samer@32 3 %
samer@32 4 % spec2fir :: [[M,L]] -> [[2*(M-1),L]].
samer@32 5
samer@32 6 n=size(A,1);
samer@32 7 S=[A; conj(A(n-1:-1:2,:))];
samer@32 8 R=fftshift(real(ifft(S)),1); % get filter coefficients
samer@32 9