summaryrefslogtreecommitdiff
path: root/1445/CH10/EX10.13/Ex10_13.sce
diff options
context:
space:
mode:
Diffstat (limited to '1445/CH10/EX10.13/Ex10_13.sce')
-rw-r--r--1445/CH10/EX10.13/Ex10_13.sce11
1 files changed, 6 insertions, 5 deletions
diff --git a/1445/CH10/EX10.13/Ex10_13.sce b/1445/CH10/EX10.13/Ex10_13.sce
index bdac5ae63..188282fe6 100644
--- a/1445/CH10/EX10.13/Ex10_13.sce
+++ b/1445/CH10/EX10.13/Ex10_13.sce
@@ -1,6 +1,7 @@
//CHAPTER 10- THREE-PHASE INDUCTION MACHINES
//Example 13
+clc;
disp("CHAPTER 10");
disp("EXAMPLE 13");
@@ -40,21 +41,21 @@ end;
//solution (b)
s=(N_s1-N_r)/N_s1;
f_r=s*f;
-disp(sprintf("(b) The slip is %.2f %% and rotor frequency is %d Hz",s*100,f_r));
+disp(sprintf("(b) The slip is %f %% and rotor frequency is %d Hz",s*100,f_r));
//solution (c)
w1=(2*%pi*N_s1)/60;
-disp(sprintf("(c(i)) The speed of stator field w.r.t. stator structure is %.3f rad/s",w1)); //Answer given in the book is wrong
+disp(sprintf("(c(i)) The speed of stator field w.r.t. stator structure is %f rad/s",w1)); //Answer given in the book is wrong
N_s2=N_s1-N_r;
w2=(2*%pi*N_s2)/60;
-disp(sprintf("(c(ii)) The speed of stator field w.r.t. rotor structure is %.3f rad/s",w2));
+disp(sprintf("(c(ii)) The speed of stator field w.r.t. rotor structure is %f rad/s",w2));
//solution (d)
factor=(2*%pi)/60; //converting rpm to radian/second
N_r1=(120*f_r)/P;
-disp(sprintf("(d(i)) The speed of rotor field w.r.t. rotor structure is %.3f rad/s",N_r1*factor));
+disp(sprintf("(d(i)) The speed of rotor field w.r.t. rotor structure is %f rad/s",N_r1*factor));
N_r2=N_r+N_r1;
-disp(sprintf("(d(ii)) The speed of rotor field w.r.t. stator structure is %.3f rad/s",N_r2*factor));
+disp(sprintf("(d(ii)) The speed of rotor field w.r.t. stator structure is %f rad/s",N_r2*factor));
N_r3=N_s1-N_r2;
disp(sprintf("(d(iii)) The speed of rotor field w.r.t. stator structure is %d rad/s",N_r3));