% matlab script file to test DFTPolyAnalysisCmplx.m and
% DFTPolySynthesisCmplx.m

p = filter16_14_448;
K = 16; 
N = 14;
Lp = length(p);

Lx = 16*14*5;
x = randn(1,16*14*5) + sqrt(-1)*randn(1,16*14*5);
%x = sin(2*pi*0.1*(1:Lx)) + sqrt(-1)*sin(2*pi*0.13*(1:Lx));

X = DFTPolyAnalysisCmplx(x,p,K,N);
y = DFTPolySynthesisCmplx(X,p,K,N);

clf;
subplot(211);
plot(real(x(1:201))); hold on;
plot(real(y(Lp-N+1:Lp-N+1+200)),'r--');
subplot(212);
plot(imag(x(1:201))); hold on;
plot(imag(y(Lp-N+1:Lp-N+1+200)),'r--');