summaryrefslogtreecommitdiff
path: root/692/CH6/EX6.28/P6_28.sce
blob: 66583b2e8a6a23a7821a74957ebee7284d084cbf (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
// Example 6.28
//Enlargement of ROC by pole-zero cancellation
clc;
clear;
z=%z;
Gz = (2 + 1.2*(1/z))/(1 - 0.2*(1/z))
disp(Gz,'Gz = ');
disp('ROC = |z|>0.2');
Hz = 3/(1 + 0.6*(1/z));
disp(Hz,'Hz = ');
disp('ROC = |z|>0.6');
Xz = Gz*Hz;
disp(Xz,'Xz = ');
disp('ROC = |z|>0.2');