summaryrefslogtreecommitdiff
path: root/1859/CH8/EX8.12/exa_8_12.sce
diff options
context:
space:
mode:
Diffstat (limited to '1859/CH8/EX8.12/exa_8_12.sce')
-rwxr-xr-x1859/CH8/EX8.12/exa_8_12.sce27
1 files changed, 27 insertions, 0 deletions
diff --git a/1859/CH8/EX8.12/exa_8_12.sce b/1859/CH8/EX8.12/exa_8_12.sce
new file mode 100755
index 000000000..b43627752
--- /dev/null
+++ b/1859/CH8/EX8.12/exa_8_12.sce
@@ -0,0 +1,27 @@
+// Exa 8.12
+clc;
+clear;
+close;
+// Given data
+// Part (a)
+d_v0= 0;
+Dv=6;
+fie= asind(d_v0/Dv);
+disp(fie,"Phase angle of first figure in degree")
+// Part (b)
+d_v0= 3;
+Dv=6;
+fie= asind(d_v0/Dv);
+disp(fie,"Phase angle of second figure in degree")
+// Part (c)
+d_v0= 5;
+Dv=5;
+fie= asind(d_v0/Dv);
+disp(fie,"Phase angle of third figure in degree")
+// Part (d)
+d_v0= 3;
+Dv=5;
+fie= asind(d_v0/Dv);
+// since ellipse is in 2nd and fourth quartes so the valid value of phase angle
+fie= 180-fie
+disp(fie,"Phase angle of forth figure in degree")