1 files changed, 27 insertions, 0 deletions
diff --git a/1445/CH7/EX7.22/ch7_ex_22.sce b/1445/CH7/EX7.22/ch7_ex_22.sce
new file mode 100644
index 000000000..105b35b3e
--- /dev/null
+++ b/1445/CH7/EX7.22/ch7_ex_22.sce
@@ -0,0 +1,27 @@
+//CHAPTER 7- SINGLE PHASE TRANSFORMER
+//Example 22
+
+disp("CHAPTER 7");
+disp("EXAMPLE 22");
+
+//VARIABLE INITIALIZATION 
+v1=6600;                             //primary voltage in Volts
+v2=400;                             //secondary voltage in Volts
+R1=2.5;
+R2=0.01;
+X2=0.2;
+pf=0.8;                             //leading
+
+//SOLUTION 
+//transfer R2 resistance to  R'2
+R_dash_2=R2*(v1/v2)^2;
+R_e1=R1+R_dash_2;
+//
+R_dash_1=R1*(v2/v1)^2;
+R_e2=R2+R_dash_1;
+//
+disp(sprintf("The total equivalent resistance referred to primary is %f Ω",R_e1));
+disp(sprintf("The total equivalent resistance referred to secondary is %f Ω",R_e2));
+disp(" "); 
+// 
+//END