summaryrefslogtreecommitdiff
path: root/2279/CH4/EX4.10/eg_4_10.sce
blob: 09fe34655d580c1344697d62e760f1ee19d5d014 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
//Example 4.10
//Convolution sum of x[n] and h[n]
clc
clear
n=0:2;
n1=0:4;
x=[0.5 0.5 0.5];
h=[3 2 1];
A=[x 0 0;0 x 0; 0 0 x];
y=A'*h'
disp("Convolution of x[n] and h[n] is...")
disp(y)
subplot(3,1,1)
xtitle("input signal x(n)","....................n","x[n]");
plot(n,x,'.');
subplot(3,1,2)
xtitle("system response h(n)","....................n","h[n]");
plot(n,h,'.');
subplot(3,1,3)
xtitle("output signal y(n)",".............................n","y[n]");
plot(n1,y,'.');