1 files changed, 15 insertions, 0 deletions
diff --git a/147/CH14/EX14.24/Example14_24.sce b/147/CH14/EX14.24/Example14_24.sce
new file mode 100644
index 000000000..0ef0107c6
--- /dev/null
+++ b/147/CH14/EX14.24/Example14_24.sce
@@ -0,0 +1,15 @@
+//Synchronous speed of induction motor N, Input Power Ps, Current Is
+//Stator resistance per phase R1, Transformation ratio a
+close();
+clear;
+clc;
+N = 900;//rpm
+Ps = 45000/3;//W
+Is = 193.6;//A
+R1 = 0.2;//ohm
+a = 2;
+R2 = (Ps/Is^2 - R1)/a^2;
+R2dash = a^2*R2;
+//Starting Torque 'Ts'
+Ts = 3*Is^2*R2dash/(2*%pi*N/60);
+mprintf('Rotor resistance per phase = %0.2f ohm\nStarting Torque = %0.1f N.m',R2,Ts);
+\ No newline at end of file