summaryrefslogtreecommitdiff
path: root/1340/CH8/EX8.4/8_4.sce
blob: d83d06103e4e73a4f689e618281969bf72d842fe (plain)
1
2
3
4
5
6
7
clc;
s =%s;
printf("Break in and  Break away points satisy the relation:\n");
printf("sum(1/(real(s)+Zi)= sum(1/(real(s)+Pi)");
G = syslin('c',1/(s-3)+1/(s-5)-1/(s+2)-1/(s+1));
disp(G);x =roots(numer(G));
disp(x(2),"break-away point =",x(1),"break-in point =");