1 files changed, 18 insertions, 0 deletions
diff --git a/257/CH10/EX10.9/example_10_9.sce b/257/CH10/EX10.9/example_10_9.sce
new file mode 100644
index 000000000..f99a25731
--- /dev/null
+++ b/257/CH10/EX10.9/example_10_9.sce
@@ -0,0 +1,18 @@
+s=%s
+//G=k/(s*(s+a)) and T=G/(1+G)
+Mr=1.04
+omegaR=11.55
+
+disp("for zeta>0.7 , Mr does not exist, so neglect higher value")
+zeta=0.6021
+disp(zeta)
+
+omegaN=omegaR/(sqrt(1-2*(zeta)^2))
+disp(omegaN,"omegaN = ")
+
+
+k=omegaN^2
+disp(k,"k=")
+disp(2*zeta*omegaN," a = ")
+disp(omegaN*sqrt(1-2*zeta^2 + sqrt(2-4*zeta^2+4*zeta^4))," B.W. = ")
+disp(4/(zeta*omegaN)," Ts = ")
+\ No newline at end of file