summaryrefslogtreecommitdiff
path: root/1340/CH4/EX4.3/4_3.sce
blob: 355349bea42677ca2a240ea3014e78aaf71c0eef (plain)
1
2
3
4
5
6
7
8
9
10
11
clc;
s = %s;
G = syslin('c',36/(s^2+4.2*s+36));
disp(G,"G(s)=");
K = denom(G);
coef = coeff(K);
disp(coef);
Wn = sqrt(coef(1,1));
disp(Wn,"Undamped Natural Frequency =");
zeta = coef(1,2)/(2*Wn);
disp(zeta,"damping ratio =")