From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001 From: priyanka Date: Wed, 24 Jun 2015 15:03:17 +0530 Subject: initial commit / add all books --- 692/CH5/EX5.14/P5_14.sce | 32 ++++++++++++++++++++++++++++++++ 1 file changed, 32 insertions(+) create mode 100755 692/CH5/EX5.14/P5_14.sce (limited to '692/CH5/EX5.14') diff --git a/692/CH5/EX5.14/P5_14.sce b/692/CH5/EX5.14/P5_14.sce new file mode 100755 index 000000000..ab583b2ab --- /dev/null +++ b/692/CH5/EX5.14/P5_14.sce @@ -0,0 +1,32 @@ +//EXAMPLE 5.14 +//DFT of two real sequences using one DFT +clear; +clc; +g = [1 2 0 1]; +disp(g,'g[n] = '); +h = [2 2 1 1]; +disp(h,'h[n] = '); +x = g + %i.*h; +disp(x,'x[n] = '); +X = fft(x,-1); +disp(X,'The DFT, X[k] = '); +X1 = conj(X); +disp(X1,'X*[k] = '); + +for i=0:3; + a(i+1)=pmodulo(-i,4); + X2(i+1)=X1(a(i+1)+1); +end + +X3 = conj(X2'); +disp(X3,'X*[<4-k>4] = '); +disp(0.5*(X + X3),'G[k] = '); +disp((X - X3)/(2*%i),'H[k] = '); + + + + + + + + -- cgit