summaryrefslogtreecommitdiff
path: root/3760/CH5/EX5.54
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3760/CH5/EX5.54
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 '3760/CH5/EX5.54')
-rw-r--r--3760/CH5/EX5.54/Ex5_54.sce15
1 files changed, 15 insertions, 0 deletions
diff --git a/3760/CH5/EX5.54/Ex5_54.sce b/3760/CH5/EX5.54/Ex5_54.sce
new file mode 100644
index 000000000..0959e9af5
--- /dev/null
+++ b/3760/CH5/EX5.54/Ex5_54.sce
@@ -0,0 +1,15 @@
+clc;
+p=2*10^6; // rated power of alternator
+v=11000; // rated voltage of alternator
+zs=0.3+5*%i; // synchronous impedance per phase
+pf=0.8; // lagging power factor
+vt=v/sqrt(3); // terminal voltage
+ia=p/(sqrt(3)*v); // full load armature current
+// with vt as reference phasor
+Ef=vt+ia*(pf-sqrt(1-pf^2)*%i)*zs;
+// now excitation level is same but load power fcator is leading
+printf('Load current is %f A\n',ia);
+de=cosd(atand(imag(Ef),real(Ef))); // angle between excitation and terminal voltage
+vt=abs(Ef)*(de+sqrt(1-de^2)*%i)-ia*(pf+sqrt(1-pf^2)*%i)*zs;
+printf('Terminal voltage at %f leading power factor is %f V per phase\n',pf,abs(vt));
+printf('Line terminal voltage is %f KV',(sqrt(3)*abs(vt))/1000);