summaryrefslogtreecommitdiff
path: root/1445/CH8/EX8.38/ch8_ex_38.sce
blob: 96d7543dc683ebb67901320a96ef92afc5ff6443 (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
26
27
28
29
30
//CHAPTER 8- DIRECT CURRENT MACHINES
//Example 38

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

//VARIABLE INITIALIZATION
v_t=215;                    //in Volts
r_a=0.4;                    //in Ohms
p=5*1000;                   //in Watts
N_g=1000;                   //speed as generator in rpm
ratio=1.1;                  //according to the solution, Φ_b:Φ_a=1.1

//SOLUTION

//As generator
I_ag=p/v_t;
E_a=v_t+(I_ag*r_a);

//As motor
I_am=p/v_t;
E_b=v_t-(I_am*r_a);
N_m=(1/ratio)*N_g*(E_b/E_a);
N_m=round(N_m);              //to round off the value
disp(sprintf("The speed of the machine as motor is %d rpm",N_m));

//END