1 files changed, 42 insertions, 0 deletions
diff --git a/1319/CH5/EX5.7/5_7.sce b/1319/CH5/EX5.7/5_7.sce
new file mode 100644
index 000000000..d96f5696f
--- /dev/null
+++ b/1319/CH5/EX5.7/5_7.sce
@@ -0,0 +1,42 @@
+// Calculate the circuit parameters of a transformer using OC and SC tests
+
+clc;
+clear;
+
+E1=200;
+E2=400;
+
+n=E2/E1; // Transformation ratio
+
+// O.C Calculations
+V1=200;
+Ioc=0.7;
+Pi=70;
+
+R0=(V1^2)/Pi;
+
+Iw=V1/R0;
+
+Im=sqrt((Ioc^2)-(Iw^2));
+
+X0=V1/Im;
+
+//S.C Calculations on HT side
+
+Pc=80;
+I=10;
+V=15;
+
+Rth= Pc/(I^2);
+Z=V/I;
+
+Xth=sqrt((Z^2)-(Rth^2));
+
+// Both these value are referred to HT side, but the answer is required to be referred to LT side
+
+Xtl=Xth/(n^2); // Reactance referred to LT side
+Rtl=Rth/(n^2); // Resistance referred to LT side
+
+printf('The Circuit parameters referred to LT side is as follows \n')
+
+printf('Ro = %f ohms \n Xo = %f ohms \n Rt = %f ohms \n Xt = %f ohms \n',R0,X0,Rtl,Xtl)