diff options
Diffstat (limited to '257/CH10/EX10.6/example_10_6.sce')
-rw-r--r-- | 257/CH10/EX10.6/example_10_6.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/257/CH10/EX10.6/example_10_6.sce b/257/CH10/EX10.6/example_10_6.sce new file mode 100644 index 000000000..2e164637f --- /dev/null +++ b/257/CH10/EX10.6/example_10_6.sce @@ -0,0 +1,14 @@ +Mr=1.1
+omegaR=11.2
+
+zeta=abs(roots(poly([0.2066 0 -1 0 1],'s',"coeff")))
+disp(zeta)
+disp("but for zeta>0.7 , Mr does not exist, so neglect higher value")
+zeta=0.54
+disp(zeta)
+
+omegaN=omegaR/(sqrt(1-2*(zeta)^2))
+disp(omegaN,"omegaN = ")
+
+TF=omegaN^2/(poly([0 2*zeta*omegaN 1],'s',"coeff"))
+disp(TF," TF = ")
\ No newline at end of file |