initial commit / add all books

2 files changed, 52 insertions, 0 deletions

diff --git a/431/CH5/EX5.13/EX5_13.sce b/431/CH5/EX5.13/EX5_13.sce
new file mode 100755
index 000000000..64452974a
--- /dev/null
+++ b/431/CH5/EX5.13/EX5_13.sce
@@ -0,0 +1,37 @@
+//chapter 5

+//example 5.13

+//page 442

+clear;

+clc;

+disp("example 5.13");

+printf("\n");

+KVA=1200;       //output power

+printf("output power=%d\n",KVA)

+V_l=3300;       //line voltage

+R_a=0.25;       //armature resistance

+I_l=(KVA*1000)/(sqrt(3)*V_l);    //line current

+//for star connected I_l=I_a

+I_a=I_l;

+V_p=V_l/sqrt(3);

+printf("V per phase= %dV\n",V_p)

+//field current of 40A produces short circuit current of 200A and open circuit emf 1100

+v_l=1100;

+i_s=200;

+Z_s= v_l/(sqrt(3)*i_s);     //synchronous impedence

+printf("Synchronous impedance,Zs=%f ohm\n",Z_s)

+X_s=sqrt(Z_s^2-R_a^2);      //synchronous reactance

+disp("(a)for 0.8 lagging power facor");

+pf=0.8;

+phi=acosd(pf);

+E=sqrt((V_p*cosd(phi)+I_a*R_a)^2+(V_p*sind(phi)+I_a*X_s)^2)

+printf("induced emf,E=%f V\n",E);

+R=((E-V_p)*100)/V_p;

+printf("regulation=%f percent\n\n",R);

+clear pf;

+pf=0.8;

+phi=acosd(pf);

+disp("(b)For leading power factor load")

+E=sqrt((V_p*cosd(phi)+I_a*R_a)^2+(V_p*sind(phi)-I_a*X_s)^2)

+printf("induced emf,E= %f V\n",E);

+R=((E-V_p)*100)/V_p;

+printf("regulation=%f percent",R);
\ No newline at end of file
diff --git a/431/CH5/EX5.13/resultEX5_13.txt b/431/CH5/EX5.13/resultEX5_13.txt
new file mode 100755
index 000000000..65f91c966
--- /dev/null
+++ b/431/CH5/EX5.13/resultEX5_13.txt
@@ -0,0 +1,15 @@
+

+ example 5.13   

+

+output power=1200

+V per phase= 1905V

+Synchronous impedance,Zs=3.175426 ohm

+ 

+ (a)for 0.8 lagging power facor   

+induced emf,E=2398.732590 V

+regulation=25.900810 percent

+

+ 

+ (b)For leading power factor load   

+induced emf,E= 1647.716860 V

+regulation=-13.517293 percent 
\ No newline at end of file