summaryrefslogtreecommitdiff
path: root/1445/CH10/EX10.7/ch10_ex_7.sce
diff options
context:
space:
mode:
Diffstat (limited to '1445/CH10/EX10.7/ch10_ex_7.sce')
-rw-r--r--1445/CH10/EX10.7/ch10_ex_7.sce44
1 files changed, 44 insertions, 0 deletions
diff --git a/1445/CH10/EX10.7/ch10_ex_7.sce b/1445/CH10/EX10.7/ch10_ex_7.sce
new file mode 100644
index 000000000..0199f014c
--- /dev/null
+++ b/1445/CH10/EX10.7/ch10_ex_7.sce
@@ -0,0 +1,44 @@
+//CHAPTER 10- THREE-PHASE INDUCTION MACHINES
+//Example 7
+
+disp("CHAPTER 10");
+disp("EXAMPLE 7");
+
+//VARIABLE INITIALIZATION
+P=4; //number of poles
+f=50; //in Hz
+r2=0.1; //rotor resistance in Ohms
+X2=2; //standstill reactance in Ohms
+E1=100; //induced emf between slip ring in Volts
+N_r=1460; //full load speed in rpm
+
+//SOLUTION
+
+//solution (i)
+N_s=(120*f)/P;
+s_fl=(N_s-N_r)/N_s;
+disp(sprintf("(i) The slip at full load is %f %%",s_fl*100));
+s_m=r2/X2;
+disp(sprintf("The slip at which maximum torque occurs is %f %%",s_m*100));
+
+//solution (ii)
+E2=E1/sqrt(3);
+disp(sprintf("(ii) The emf induced in rotor per phase is %f V",E2));
+
+//solution (iii)
+X2_dash=s_fl*X2;
+disp(sprintf("(iii) The rotor reactance per phase is %f Ω",X2_dash));
+
+//solution (iv)
+z=sqrt((r2^2)+(X2_dash)^2);
+I2=(s_fl*E2)/z;
+disp(sprintf("(iv) The rotor current is %f A",I2));
+
+//solution (v)
+pow_fact_r=r2/z;
+disp(sprintf("(v) The rotor power factor is %f (lagging)",pow_fact_r));
+
+//END
+
+
+