blob: 21e42734da4cd727d4cc1117a1cb41cece4ac63c (
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
|
// A Texbook on POWER SYSTEM ENGINEERING
// A.Chakrabarti, M.L.Soni, P.V.Gupta, U.S.Bhatnagar
// DHANPAT RAI & Co.
// SECOND EDITION
// PART I : GENERATION
// CHAPTER 7: TARIFFS AND ECONOMIC ASPECTS IN POWER GENERATION
// EXAMPLE : 7.13 :
// Page number 77
clear ; clc ; close ; // Clear the work space and console
// Given data
gen_expense = 850000.0 // Annual generation expense(Rs)
fuel_expense = 2800000.0 // Annual fuel expense(Rs)
trans_expense = 345000.0 // Annual transmission expense(Rs)
dist_expense = 2750000.0 // Annual distribution expense(Rs)
repair_expense = 300000.0 // Annual repairs,etc expense(Rs)
unit_gen = 600.0*10**6 // Number of units generated per year(kWh)
MD = 75.0*10**3 // Maximum demand(kW)
gen = 0.9 // Fixed charges for generation
fuel = 0.15 // Fixed charges for fuel
transm = 0.85 // Fixed charges for transmission
dist = 0.95 // Fixed charges for distribution
repair = 0.5 // Fixed charges for repairs,etc
loss_dist = 0.2 // Losses in transmission and distribution
// Calculations
fixed_gen = gen_expense*gen // Fixed charge on generation(Rs)
running_gen = gen_expense*(1-gen) // Running charge on generation(Rs)
fixed_fuel = fuel_expense*fuel // Fixed charge on fuel(Rs)
running_fuel = fuel_expense*(1-fuel) // Running charge on fuel(Rs)
fixed_trans = trans_expense*transm // Fixed charge on transmission(Rs)
running_trans = trans_expense*(1-transm) // Running charge on transmission(Rs)
fixed_dist = dist_expense*dist // Fixed charge on distribution(Rs)
running_dist = dist_expense*(1-dist) // Running charge on distribution(Rs)
fixed_repair = repair_expense*repair // Fixed charge on repairs,etc(Rs)
running_repair = repair_expense*(1-repair) // Running charge on repairs,etc(Rs)
fixed_charge = fixed_gen+fixed_fuel+fixed_trans+fixed_dist+fixed_repair // Total fixed charges(Rs)
running_charge = running_gen+running_fuel+running_trans+running_dist+running_repair // Total running charges(Rs)
fixed_unit = fixed_charge/MD // Fixed charges per unit(Rs)
units_dist = unit_gen*(1-loss_dist) // Total number of units distributed(kWh)
running_unit = running_charge*100/units_dist // Running charges per unit(Paise)
// Results
disp("PART I - EXAMPLE : 7.13 : SOLUTION :-")
printf("\nTwo part tariff is Rs %.3f per kW of maximum demand plus %.3f paise per kWh", fixed_unit,running_unit)
|
