summaryrefslogtreecommitdiff
path: root/1340/CH4/EX4.4/4_4.sce
blob: a2492327fd879f0dedc6d9a32cf48282a11e4591 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
clc;
s =%s;
for k = 12:4:20
G = syslin('c',k/(s^2+8*s+k));
disp(G);
den = denom(G);
coef = coeff(den);
Wn = sqrt(coef(1,1));disp(Wn,"Natural Frequency = ");
zeta = coef(1,2)/(2*Wn);disp(zeta,"Daming ratio = ");
if(zeta==1)
    printf("system is critically damped");
else if(zeta>1)
        printf("overdamped");
    else printf("underdamped");
        end
end
end