summaryrefslogtreecommitdiff
path: root/758/CH3/EX3.11/Ex_3_11.sce
blob: bda46c92c94c5b42815ad0af8d8ab4350bf76666 (plain)
1
2
3
4
5
6
7
8
9
10
11
//Example 3.11

clc;clear;close;
s=poly(0,'s');
F=4*(s+1)*(s+3)/(s+2)/(s+4);
disp(F,'Given Transfer Function:');
zero=roots(numer(F));
pole=roots(denom(F));
disp(zero,'Zeros of transfer function: ');
disp(pole,'Poles of transfer function: ');
plzr(F);