summaryrefslogtreecommitdiff
path: root/1445/CH3/EX3.6/ch3_ex_6.sce
blob: 60adf0c83c5e5033a49bb7107120f519e372e925 (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
31
32
33
34
//CHAPTER 3- THREE-PHASE A.C. CIRCUITS
//Example 6

disp("CHAPTER 3");
disp("EXAMPLE 6");

//VARIABLE INITIALIZATION
v_l=3300;                     //in Volts
p_out=1500*735.5;             //in Watts as 1 metric horsepower= 735.498W
eff=0.85;
pow_fact=0.81;

//SOLUTION

//solution (a)
p_in=p_out/eff;
disp(sprintf("(a) The motor input is %f kW",p_in/1000));

//solution (b)
I=p_in/(sqrt(3)*v_l*pow_fact);
disp(sprintf("(b) The line and phase current of the alternator is %f A",I));

//solution (c)
I_l=I;
I_ph=I_l/sqrt(3);
disp(sprintf("(c) The line current of the motor is %f A",I_l));
disp(sprintf("The phase current of the motor is %f A",I_ph));

//Answers may be different due to precision of floating point numbers

//END