blob: 3c811616d3232fd543ea32f40aabe3bdf7fc4f49 (
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
|
// Example 9.7
// Determine (a) Active and reactive components of the bus load (b) If the
// power factor of generator A is 0.94 lagging, determine the reactive power
// supplied by each machine.
// Page 366
clc;
clear;
close;
// Given data
Pbuspower=500; // Power supplied
Pind=200; // Induction motor power
PF=0.852; // Percent power factor
NA=2; // Number of alternators
LPF=0.94; // Lagging power factor
// (a) Active and reactive components of the bus load
Pbus=Pbuspower+Pind*PF; // Active component of the bus load
ThetaMot=acosd(PF); // Power angle of motor
Qbus=Pind*sind(ThetaMot); // Reactive component the bus load
// (b) Reactive power supplied by each machine
Pa=Pbus/NA; // Alternator A power
ThetaA=acosd(LPF); // Alternator A angle
Qa=tand(ThetaA)*Pa; // Reactive power supplied by machine A
Qb=Qbus-Qa; // Reactive power supplied by machine B
// Display result on command window
printf("\n Active component of the bus load = %0.2f kW ",Pbus);
printf("\n Reactive component of the bus load = %0.1f kvar",Qbus);
printf("\n Reactive power supplied by machine A = %0.1f kvar",Qa);
printf("\n Reactive power supplied by machine B = %0.1f kvar",Qb);
|