diff options
Diffstat (limited to '62/CH6/EX6.33')
-rwxr-xr-x | 62/CH6/EX6.33/ex_6_33.sce | 34 | ||||
-rwxr-xr-x | 62/CH6/EX6.33/ex_6_33_1.png | bin | 0 -> 16194 bytes | |||
-rwxr-xr-x | 62/CH6/EX6.33/ex_6_33_2.png | bin | 0 -> 15875 bytes |
3 files changed, 34 insertions, 0 deletions
diff --git a/62/CH6/EX6.33/ex_6_33.sce b/62/CH6/EX6.33/ex_6_33.sce new file mode 100755 index 000000000..f04c1649a --- /dev/null +++ b/62/CH6/EX6.33/ex_6_33.sce @@ -0,0 +1,34 @@ +clear;
+clc;
+close;
+n=-20:19;
+h=sinc(%pi*n/4)/4;
+disp("it can be seen that h[n] is a filter that allows frequencies between -%pi/4 and +%pi/4")
+disp("therefore only the dc part of x[n] is passed i.e c0")
+subplot(2,1,1)
+plot2d3(n,h);
+plot(n,h,'r.');
+xtitle('h[n]','n')
+w=-4:0.01:4;
+Hw=h*exp(-%i*n'*w);
+subplot(2,1,2)
+plot2d(w,Hw);
+title("H[w] fourier transform")
+T0=5;
+w0=%pi*2/5;
+z=[ones(1,3) zeros(1,2)];
+x=[];
+for i=1:length(n)/T0
+ x=[x z];
+end
+figure
+subplot(2,1,1)
+plot2d3(n,x);
+plot(n,x,'r.')
+xtitle('x[n]','n')
+c0= (1/5)*sum(z);
+y=ones(1,length(n))*c0;
+subplot(2,1,2)
+plot2d3(n,y);
+plot(n,y,'r.--')
+xtitle('y[n]','n')
\ No newline at end of file diff --git a/62/CH6/EX6.33/ex_6_33_1.png b/62/CH6/EX6.33/ex_6_33_1.png Binary files differnew file mode 100755 index 000000000..3690eea7b --- /dev/null +++ b/62/CH6/EX6.33/ex_6_33_1.png diff --git a/62/CH6/EX6.33/ex_6_33_2.png b/62/CH6/EX6.33/ex_6_33_2.png Binary files differnew file mode 100755 index 000000000..ba3ce0397 --- /dev/null +++ b/62/CH6/EX6.33/ex_6_33_2.png |