diff options
Diffstat (limited to '1445/CH10/EX10.16/Ex10_16.sce')
| -rw-r--r-- | 1445/CH10/EX10.16/Ex10_16.sce | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/1445/CH10/EX10.16/Ex10_16.sce b/1445/CH10/EX10.16/Ex10_16.sce index 6328912eb..0ace23044 100644 --- a/1445/CH10/EX10.16/Ex10_16.sce +++ b/1445/CH10/EX10.16/Ex10_16.sce @@ -1,6 +1,7 @@ //CHAPTER 10- THREE-PHASE INDUCTION MACHINES //Example 16 +clc; disp("CHAPTER 10"); disp("EXAMPLE 16"); @@ -23,9 +24,9 @@ sm2=(-b-sqrt(D))/(2*a); if(sm1<=0 & sm2<=0) then disp("The value of the slip at maximum torque (maximum slip) is not valid"); else if(sm1>0 & sm1<1) -disp(sprintf("The slip at maximum torque (maximum slip) is %.3f",sm1)); //slip is a unitless quantity +disp(sprintf("The slip at maximum torque (maximum slip) is %f",sm1)); //slip is a unitless quantity else if(sm2>0 & sm2<1) -disp(sprintf("The slip at maximum torque (maximum slip) is %.4f",sm2)); +disp(sprintf("The slip at maximum torque (maximum slip) is %f",sm2)); end; //solution (b) (taking the ratio of T_efl and T_em) @@ -37,15 +38,15 @@ D=(b)^2-(4*a*c); ans1=(-b+sqrt(D))/(2*a); ans2=(-b-sqrt(D))/(2*a); if(ans1>0 & ans1<1) -disp(sprintf("The full load slip is %.3f",ans1)); +disp(sprintf("The full load slip is %f",ans1)); sfl=ans1; else if(ans2>0 & ans2<1) -disp(sprintf("The full load slip is %.3f",ans2)); +disp(sprintf("The full load slip is %f",ans2)); sfl=ans2; end; //solution (c) I=sqrt(ratio1/sfl); -disp(sprintf("The rotor current at the starting in terms of full load current is %.3f A",I)); +disp(sprintf("The rotor current at the starting in terms of full load current is %f A",I)); //END |