diff options
author | prashantsinalkar | 2017-10-10 12:38:01 +0530 |
---|---|---|
committer | prashantsinalkar | 2017-10-10 12:38:01 +0530 |
commit | f35ea80659b6a49d1bb2ce1d7d002583f3f40947 (patch) | |
tree | eb72842d800ac1233e9d890e020eac5fd41b0b1b /758/CH6/EX6.35 | |
parent | 7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (diff) | |
download | Scilab-TBC-Uploads-f35ea80659b6a49d1bb2ce1d7d002583f3f40947.tar.gz Scilab-TBC-Uploads-f35ea80659b6a49d1bb2ce1d7d002583f3f40947.tar.bz2 Scilab-TBC-Uploads-f35ea80659b6a49d1bb2ce1d7d002583f3f40947.zip |
updated the code
Diffstat (limited to '758/CH6/EX6.35')
-rwxr-xr-x | 758/CH6/EX6.35/Ex_6_35.sce | 50 |
1 files changed, 25 insertions, 25 deletions
diff --git a/758/CH6/EX6.35/Ex_6_35.sce b/758/CH6/EX6.35/Ex_6_35.sce index 11e55b4a0..efe00eddb 100755 --- a/758/CH6/EX6.35/Ex_6_35.sce +++ b/758/CH6/EX6.35/Ex_6_35.sce @@ -1,25 +1,25 @@ -//Example 6.35
-
-clc;clear;close;
-h=[2 2 1];
-x=[3 0 -2 0 2 1 0 -2 -1 0];
-M=length(h); //length of impulse response
-L=2^M; //length of FFT/IFFT operation
-N=L-M+1;
-xl=length(x);
-K=ceil(xl/N); //number of iterations
-h=[h zeros(1,L-M)];
-x=[zeros(1,M-1) x x(1:K*N-xl)];
-H=fft(h);
-for k=0:K-1
- xk=x(k*N+1:(k+1)*N+M-1);
- Xk=fft(xk);
- Yk=H.*Xk;
- yk=ifft(Yk);
- yk=clean(yk);
- y=[y(1:k*N) yk(M:L)];
- disp(k+1,'Segment =');
- disp(xk,'xk(n)=');
- disp(yk,'yk(n)=');
-end
-disp(y,'Output Sequence is y(n): ');
+//Example 6.35 + +clc;clear;close; +h=[2 2 1]; +x=[3 0 -2 0 2 1 0 -2 -1 0]; +M=length(h); //length of impulse response +L=2^M; //length of FFT/IFFT operation +N=L-M+1; +xl=length(x); +K=ceil(xl/N); //number of iterations +h=[h zeros(1,L-M)]; +x=[zeros(1,M-1) x x(1:K*N-xl)]; +H=fft(h); +for k=0:K-1 + xk=x(k*N+1:(k+1)*N+M-1); + Xk=fft(xk); + Yk=H.*Xk; + yk=ifft(Yk); + yk=clean(yk); + y=[yk(1:k*N) yk(M:L)]; + disp(k+1,'Segment ='); + disp(xk,'xk(n)='); + disp(yk,'yk(n)='); +end +disp(y,'Output Sequence is y(n): ');
\ No newline at end of file |