diff options
Diffstat (limited to '1445/CH8/EX8.36/Ex8_36.sce')
-rw-r--r-- | 1445/CH8/EX8.36/Ex8_36.sce | 18 |
1 files changed, 9 insertions, 9 deletions
diff --git a/1445/CH8/EX8.36/Ex8_36.sce b/1445/CH8/EX8.36/Ex8_36.sce index 6ea9e53b5..842d723de 100644 --- a/1445/CH8/EX8.36/Ex8_36.sce +++ b/1445/CH8/EX8.36/Ex8_36.sce @@ -1,10 +1,10 @@ //CHAPTER 8- DIRECT CURRENT MACHINES //Example 36 +clc; disp("CHAPTER 8"); disp("EXAMPLE 36"); -//250 long shunt compound generator //VARIABLE INITIALIZATION v_t=250; //in Volts I_l=150; //in Amperes @@ -18,20 +18,20 @@ r_ip=0.02; //interpole resistance in Ohms //SOLUTION //solution (a) -p_o=v_t*I_l; // power output -I_sh=v_t/r_sh; // shunt current -I_a=I_l+I_sh; // armature current -r_tot=r_b+r_se+r_ip; // total armature circuit resistance +p_o=v_t*I_l; +I_sh=v_t/r_sh; +I_a=I_l+I_sh; +r_tot=r_b+r_se+r_ip; arm_loss=(I_a^2)*r_tot; //armature circuit copper loss cu_loss=v_t*I_sh; //shunt field copper loss c_loss=cu_loss+loss1+loss2; //constant loss -disp(sprintf("(a) The constant loss is %.0f W",c_loss)); +disp(sprintf("(a) The constant loss is %f W",c_loss)); //solution (b) tot_loss=arm_loss+c_loss; //total loss -p_i=p_o+tot_loss; // power input -eff=(p_o/p_i)*100; // efficiency -disp(sprintf("(b) The full load efficiency is %.0f %%",eff)); +p_i=p_o+tot_loss; +eff=(p_o/p_i)*100; +disp(sprintf("(b) The full load efficiency is %f %%",eff)); //END |