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
|
// A Texbook on POWER SYSTEM ENGINEERING
// A.Chakrabarti, M.L.Soni, P.V.Gupta, U.S.Bhatnagar
// DHANPAT RAI & Co.
// SECOND EDITION
// PART II : TRANSMISSION AND DISTRIBUTION
// CHAPTER 18: POWER DISTRIBUTION SYSTEMS
// EXAMPLE : 18.1 :
// Page number 437
clear ; clc ; close ; // Clear the work space and console
// Given data
V_A = 225.0 // Potential at point A(V)
R_A = 5.0 // Resistance of line A(ohm)
V_B = 210.0 // Potential at point B(V)
R_B = 1.0 // Resistance of line B(ohm)
V_C = 230.0 // Potential at point C(V)
R_C = 1.0 // Resistance of line C(ohm)
V_D = 230.0 // Potential at point D(V)
R_D = 2.0 // Resistance of line D(ohm)
V_E = 240.0 // Potential at point E(V)
R_E = 2.0 // Resistance of line E(ohm)
// Calculations
V_0 = ((V_A/R_A)+(V_B/R_B)+(V_C/R_C)+(V_D/R_D)+(V_E/R_E))/((1/R_A)+(1/R_B)+(1/R_C)+(1/R_D)+(1/R_E)) // Potential at point O(V)
I_A = (V_A-V_0)/R_A // Current leaving supply point A(A)
I_B = (V_B-V_0)/R_B // Current leaving supply point B(A)
I_C = (V_C-V_0)/R_C // Current leaving supply point C(A)
I_D = (V_D-V_0)/R_D // Current leaving supply point D(A)
I_E = (V_E-V_0)/R_E // Current leaving supply point E(A)
// Results
disp("PART II - EXAMPLE : 18.1 : SOLUTION :-")
printf("\nPotential of point O, V_0 = %.f V", V_0)
printf("\nCurrent leaving supply point A, I_A = %.f A", I_A)
printf("\nCurrent leaving supply point B, I_B = %.f A", I_B)
printf("\nCurrent leaving supply point C, I_C = %.f A", I_C)
printf("\nCurrent leaving supply point D, I_D = %.2f A", I_D)
printf("\nCurrent leaving supply point E, I_E = %.2f A", I_E)
|
