1 files changed, 28 insertions, 0 deletions
diff --git a/1445/CH7/EX7.9/ch7_ex_9.sce b/1445/CH7/EX7.9/ch7_ex_9.sce
new file mode 100644
index 000000000..6796c2715
--- /dev/null
+++ b/1445/CH7/EX7.9/ch7_ex_9.sce
@@ -0,0 +1,28 @@
+//CHAPTER 7- SINGLE PHASE TRANSFORMER
+//Example 9
+
+disp("CHAPTER 7");
+disp("EXAMPLE 9");
+
+//VARIABLE INITIALIZATION 
+v1=11000;                       //primary voltage in Volts
+v2=400;                         //secondary voltage in Volts
+Io=1;                           //primary current
+pf=0.24                         //power factor lagging
+
+//SOLUTION
+Ic=Io*pf;
+disp("SOLUTION (a)");
+disp(sprintf("The value of core loss current is %f Amp",Ic));
+//
+Iphi=sqrt(Io^2-Ic^2);
+disp("SOLUTION (b)");
+disp(sprintf("The value of core loss current is %f Amp",Iphi));
+//
+IronLoss=v1*pf;
+disp("SOLUTION (c)");
+disp(sprintf("The iron loss  is %f W",IronLoss));
+disp(" "); 
+// 
+//END
+