summaryrefslogtreecommitdiff
path: root/1445/CH3/EX3.1/ch3_ex_1.sce
blob: 559b4579bc168f7d8eb5184bb295ae069ce29d84 (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
35
36
37
38
39
40
41
42
43
44
45
46
47
//CHAPTER 3- THREE-PHASE A.C. CIRCUITS
//Example 1

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

//VARIABLE INITIALIZATION
v_l=400;                         //line voltage in Volts
r=15;                            //resistance in Ohms
xc=10;                           //capacitive resistance in Ohms

//SOLUTION

//solution (i)
v_ph=v_l/sqrt(3);
disp(sprintf("(i) The phase voltage is %f V",v_ph));

//solution (ii)
z_ph=sqrt((r^2)+(xc^2));
I_l=v_ph/z_ph;
disp(sprintf("(ii) The line current is %f A",I_l));

//solution (iii)
//phase current = line current since connection is star 
disp(sprintf("(iii) The phase current is %f A",I_l));

//solution (iv)
pow_fact=r/z_ph;
disp(sprintf("(iv) The power factor of the circuit is %f (leading)",pow_fact));

//solution (v)
p=sqrt(3)*v_l*I_l*pow_fact;
disp(sprintf("(v) The total power absorbed is %f W",p));

//solution (vi)
va=sqrt(3)*v_l*I_l;
disp(sprintf("(vi) The apparent power is %f VA",va));
var=sqrt((va^2)-(p^2));
disp(sprintf("The reactive power is %f VAR",var));

//Answers (v) and (vi) are different due to precision of floating point numbers

//END