summaryrefslogtreecommitdiff
path: root/257/CH7/EX7.35/example_7_35.sce
blob: ac81e2b0ed7fa169febd58e6417f9494f198f2c2 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
K=33;
B=15;
M=3

T=1/(M*s^2+B*s+K)

omegaN=sqrt(11)           //comparing denominator with standard form
disp(omegaN,"omegaN = ")
zeta=5/(2*omegaN)
disp(zeta,"zeta=")
disp(%e^(-%pi*zeta/sqrt(1-zeta^2))," Mp = ")
omegaD=omegaN*(sqrt(1-zeta^2))
Tp=%pi/omegaD
disp(Tp," Tp = ")
disp(4/(zeta*omegaN)," Ts = ")