summaryrefslogtreecommitdiff
path: root/257/CH7/EX7.9/example_7_9.sce
diff options
context:
space:
mode:
Diffstat (limited to '257/CH7/EX7.9/example_7_9.sce')
-rw-r--r--257/CH7/EX7.9/example_7_9.sce14
1 files changed, 14 insertions, 0 deletions
diff --git a/257/CH7/EX7.9/example_7_9.sce b/257/CH7/EX7.9/example_7_9.sce
new file mode 100644
index 000000000..c98cafa1f
--- /dev/null
+++ b/257/CH7/EX7.9/example_7_9.sce
@@ -0,0 +1,14 @@
+q=poly([24 5 1],'s','coeff');
+G=20/q
+H=1
+y=G*H
+
+omegaN=sqrt(24) //comparing denominator with standard form
+disp(omegaN,"omegaN = ")
+zeta=5/(2*omegaN)
+disp(zeta,"zeta=")
+omegaD=omegaN*sqrt(1-zeta^2)
+disp(omegaD,"omegaD = ")
+syms t
+theta=atan(sqrt(1-zeta^2)/zeta)
+disp(20/24*((1-(%e^(-zeta*omegaN*t))/sqrt(1-zeta^2)*sin(omegaD*t+theta)))) \ No newline at end of file