initial commit / add all books

1 files changed, 47 insertions, 0 deletions

diff --git a/1445/CH7/EX7.16/Ex7_16.sce b/1445/CH7/EX7.16/Ex7_16.sce
new file mode 100644
index 000000000..99cf22818
--- /dev/null
+++ b/1445/CH7/EX7.16/Ex7_16.sce
@@ -0,0 +1,47 @@
+//CHAPTER 7- SINGLE PHASE TRANSFORMER
+//Example 16
+
+disp("CHAPTER 7");
+disp("EXAMPLE 16");
+
+//Values from the previous example.
+//VARIABLE INITIALIZATION
+va=20000;                        //apparent power
+v1=2000;                         //primary voltage in Volts
+v2=200;                          //secondary voltage in Volts
+R1=2.5;                          //in Ohms
+R2=0.04;                         //in Ohms
+X1=8;                            //in Ohms
+X2=0.07;                         //in Ohms 
+pf2=0.8;
+
+//SOLUTION
+//N1/N2=v1/v2;
+I2=va/v2;
+phi2=acos(pf2);
+
+//
+R_dash_1=R1*((v2/v1)^2);
+X_dash_1=X1*((v2/v1)^2);
+//
+R_e2=R_dash_1+R2;
+X_e2=X_dash_1+X2;
+//disp(sprintf("The total resistance referred to secondary is %f Ω",R_e2));
+//disp(sprintf("The total reactance referred to secondary is %f Ω",X_e2));
+//
+//power factor angle at which regulation is zero is given by tan.phi2=-Re2/Xe2
+phi2=atan(-R_e2/X_e2);
+disp(sprintf("The PF at which the regulation is zero is %.3f",cos(phi2)));
+//
+//power factor angle at which regulation is maximum is given by tan.phi2=Xe2/Re2
+phi2=atan(X_e2/R_e2);
+disp(sprintf("The PF at which the regulation is maximum is %.3f",cos(phi2)));
+//R=ercosphi2+vx.sinphi2
+//E2=V2+I2.R
+
+V2=v2-(I2*R_e2*cos(phi2)+I2*X_e2*sin(phi2));
+%reg=(v2-V2)*100/v2;
+disp(sprintf("The maximum value of percent regulation is %.2f ",%reg));
+disp(" "); 
+// 
+//END