summaryrefslogtreecommitdiff
path: root/1445/CH8/EX8.12/Ex8_12.sce
diff options
context:
space:
mode:
Diffstat (limited to '1445/CH8/EX8.12/Ex8_12.sce')
-rw-r--r--1445/CH8/EX8.12/Ex8_12.sce8
1 files changed, 4 insertions, 4 deletions
diff --git a/1445/CH8/EX8.12/Ex8_12.sce b/1445/CH8/EX8.12/Ex8_12.sce
index 364e96eaf..11e8f4315 100644
--- a/1445/CH8/EX8.12/Ex8_12.sce
+++ b/1445/CH8/EX8.12/Ex8_12.sce
@@ -1,10 +1,10 @@
//CHAPTER 8- DIRECT CURRENT MACHINES
//Example 12
+clc;
disp("CHAPTER 8");
disp("EXAMPLE 12");
-//4 pole wave wound 750 RPM shunt generator
//VARIABLE INITIALIZATION
P=4; //number of poles
N=750; //in rpm
@@ -16,13 +16,13 @@ r_l=10; //load resistance in Ohms
A=2; //for wave winding
//SOLUTION
-E_a=(phi*Z*N*P)/(60*A); //induced emf
-disp(sprintf("The induced emf is %.0f V",E_a));
+E_a=(phi*Z*N*P)/(60*A);
+disp(sprintf("The induced emf is %f V",E_a));
// E_a=v+(I_a*r_a) but I_a=I_l+I_f and I_l=v/r_l, I_f=v/r_f =>I_a=(v/r_l) + (v/r_f)
// =>E_a=v+(((v/r_l) + (v/r_f))*r_a)
// taking v common, the following equation is obtained
v=E_a/(1+(r_a/r_f)+(r_a/r_l));
-disp(sprintf("The terminal voltage of the machine is %.0f V",v));
+disp(sprintf("The terminal voltage of the machine is %f V",v));
//The answer is slightly different due to the precision of floating point numbers