1 files changed, 18 insertions, 0 deletions
diff --git a/431/CH3/EX3.6/EX3_6.sce b/431/CH3/EX3.6/EX3_6.sce
new file mode 100755
index 000000000..bce545724
--- /dev/null
+++ b/431/CH3/EX3.6/EX3_6.sce
@@ -0,0 +1,18 @@
+//Calculating the value of primary current
+//Chapter 3
+//Example 3.6
+//page 207
+clear;
+clc; 
+disp("Example 3.6")
+I0=1.5;                //no-load current
+phi0=acosd(0.2)
+I2=40;                 //secondary current in amperes
+phi2=acosd(0.8)
+r=3;                    //ratio of primary and secondary turns
+I1=I2/r;            
+I1c=(I1*cosd(phi2))+(I0*cosd(phi0));
+I1s=(I1*sind(phi2))+(I0*sind(phi0));
+I=sqrt(I1c^2+I1s^2);
+printf("I1=%fA",I)
+