summaryrefslogtreecommitdiff
path: root/1445/CH8/EX8.23/ch8_ex_23.sce
blob: 55b53553d2dcf6f7618eed9b2420ef109bf426e5 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
//CHAPTER 8- DIRECT CURRENT MACHINES
//Example 23

disp("CHAPTER 8");
disp("EXAMPLE 23");

//VARIABLE INITIALIZATION
v=230;                         //in Volts
r_a=0.4;                       //in Ohms
r_f1=115;                      //in Ohms
I_a=20;                        //in Amperes
N1=800;                        //in rpm
N2=1000;                       //in rpm

//SOLUTION
I_f1=v/r_f1; //redundant step
E_b1=v-(I_a*r_a); 
//rearranging the equation, we get,
r_f2=((E_b1*N2)/((v*N1)-(N1*I_a*r_a)))*r_f1;  
r_f2_dash=r_f2-r_f1;
disp(sprintf("The external resistance is %f Ω",r_f2_dash));

//The answer is slightly different due to the precision of floating point numbers

//END