1 files changed, 27 insertions, 0 deletions
diff --git a/1445/CH7/EX7.13/ch7_ex_13.sce b/1445/CH7/EX7.13/ch7_ex_13.sce
new file mode 100644
index 000000000..c217cb56d
--- /dev/null
+++ b/1445/CH7/EX7.13/ch7_ex_13.sce
@@ -0,0 +1,27 @@
+//CHAPTER 7- SINGLE PHASE TRANSFORMER
+//Example 13
+
+disp("CHAPTER 7");
+disp("EXAMPLE 13");
+
+//VARIABLE INITIALIZATION 
+v1=230;                           //primary voltage in Volts
+v2=115;
+f=50;                             //Hz
+Io=2;                            //in Amp no load current
+pf0 =0.28;                       //lagging 
+I2=20;                           //
+pf2=0.8;                         //lagging
+
+//SOLUTION
+//  
+phi0=acos(pf0);
+phi2=acos(pf2);
+I_dash_2=I2*v2/v1;
+Ix=Io*sin(phi0)+I_dash_2*sin(phi2);
+Iy=Io*cos(phi0)+I_dash_2*cos(phi2);
+I1=sqrt(Ix^2+Iy^2);
+disp(sprintf("The current taken by primary is %f Amp",I1));
+disp(" "); 
+// 
+//END