summaryrefslogtreecommitdiff
path: root/3802/CH9/EX9.5/Ex9_5.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3802/CH9/EX9.5/Ex9_5.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3802/CH9/EX9.5/Ex9_5.sce')
-rw-r--r--3802/CH9/EX9.5/Ex9_5.sce31
1 files changed, 31 insertions, 0 deletions
diff --git a/3802/CH9/EX9.5/Ex9_5.sce b/3802/CH9/EX9.5/Ex9_5.sce
new file mode 100644
index 000000000..9b755bf9e
--- /dev/null
+++ b/3802/CH9/EX9.5/Ex9_5.sce
@@ -0,0 +1,31 @@
+//Book Name:Fundamentals of Electrical Engineering
+//Author:Rajendra Prasad
+//Publisher: PHI Learning Private Limited
+//Edition:Third ,2014
+
+//Ex9_5.sce
+
+clc;
+clear;
+V=1+%i*0;
+Xd=1.0;
+Xq=0.6;
+pf=0.8;
+theta=acosd(pf);
+Ia1=pf-%i*sind(acosd(pf));
+Ia=1.0; //phase magnitude of Ia
+
+tan_del=(Ia*Xq*cosd(theta))/(V+(Ia*Xq*sind(theta)));
+del=atand(real(tan_del));
+Ef_dash=((V+(Ia*Xq*sind(theta)))^2+(Ia*Xq*cosd(theta))^2)^(1/2);
+
+Ef=real(Ef_dash)+(Ia*sind(theta+del)*(Xd-Xq));
+disp(Ef,'Magnitude excitation voltage in p.u is')
+
+Ef_double_dash=V*(1+%i*0)+%i*((cosd(theta)-%i*sind(theta))*Xd);
+disp(Ef_double_dash,'The rectangular value of double excited voltage in p.u is')
+
+Ef_double_dash_mag=sqrt(real(Ef_double_dash)^2+imag(Ef_double_dash)^2);
+Ef_double_dash_ang=atand(imag(Ef_double_dash)/real(Ef_double_dash));
+printf("\n The polar form of double excited voltage=%1.2f angle%2.3f degree \n",Ef_double_dash_mag,Ef_double_dash_ang)
+