blob: 620dec6ac061260fe38351383447128c84163b2b (
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
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
|
//Variable declaration:
f = 100000 //Flow rate of flue gas (acfm)
i = 0.1 //Interest rate
//From table 27.4:
//For finned preheater:
ac1 = 3.1 //Equipment cost ($/acfm)
ac2 = 0.8 //Installation cost ($/acfm)
ac3 = 0.06 //Operating cost ($/acfm-yr)
ac4 = 14000 //Maintenance cost ($/yr)
an = 20 //Lifetime (yr)
//For 4-pass preheater:
bc1 = 1.9 //Equipment cost ($/acfm)
bc2 = 1.4 //Installation cost ($/acfm)
bc3 = 0.06 //Operating cost for ($/acfm-yr)
bc4 = 28000 //Maintenance cost ($/yr)
bn = 15 //Lifetime of (yr)
//For 2-pass preheater:
cc1 = 2.5 //Equipment cost ($/acfm)
cc2 = 1.0 //Installation cost ($/acfm)
cc3 = 0.095 //Operating cost for ($/acfm-yr)
cc4 = 9500 //Maintenance cost for ($/yr)
cn = 20 //Lifetime of (yr)
//Calculation:
//For Finned preheater:
aEC = f*ac1 //Total equipment cost ($)
aIC = f*ac2 //Total installation cost ($)
aOC = f*ac3 //Total operating cost ($)
aMC = f*ac4 //Total maintenance cost ($)
aCRF = (i*(1+i)**an)/((1+i)**an-1) //Capital recovery factor
aAEC = aEC*aCRF //Equipment annual cost ($/yr)
aAIC = aIC*aCRF //Installation annual cost($/yr)
aAOC = ac3*f //Annual operating cost ($)
aAMC = ac4 //Annual maintenance cost ($)
aTAC = aAEC+aAIC+aAOC+aAMC //Total annual cost ($)
//For 4-pass preheater:
bEC = f*bc1 //Total equipment cost ($)
bIC = f*bc2 //Total installation cost ($)
bOC = f*bc3 //Total operating cost ($)
bMC = f*bc4 //Total maintenance cost ($)
bCRF = (i*(1+i)**bn)/((1+i)**bn-1) //Capital recovery factor
bAEC = bEC*bCRF //Equipment annual cost ($/yr)
bAIC = bIC*bCRF //Installation annual cost($/yr)
bAOC = bc3*f //Annual operating cost ($)
bAMC = bc4 //Annual maintenance cost ($)
bTAC = bAEC+bAIC+bAOC+bAMC //Total annual cost ($)
//For 2-pass preheater:
cEC = f*cc1 //Total equipment cost ($)
cIC = f*cc2 //Total installation cost ($)
cOC = f*cc3 //Total operating cost ($)
cMC = f*cc4 //Total maintenance cost ($)
cCRF = (i*(1+i)**cn)/((1+i)**cn-1) //Capital recovery factor
cAEC = cEC*cCRF //Equipment annual cost ($/yr)
cAIC = cIC*cCRF //Installation annual cost($/yr)
cAOC = cc3*f //Annual operating cost ($)
cAMC = cc4 //Annual maintenance cost ($)
cTAC = cAEC+cAIC+cAOC+cAMC //Total annual cost ($)
//Result:
printf("Total annual cost for finned preheater is : $ %.0f",aTAC)
printf("Total annual cost for 4-pass preheater is : $ %.0f",bTAC)
printf("Total annual cost for 2-pass preheater is : $ %.0f",cTAC)
if (cTAC<aTAC & cTAC<bTAC) then
printf("According to the analysis, the 2-pass exchanger is the most economically attractive device since the annual cost is the lowest.")
elseif (bTAC<aTAC & bTAC<cTAC) then
printf("According to the analysis, the 4-pass exchanger is the most economically attractive device since the annual cost is the lowest.")
elseif (aTAC<cTAC & aTAC<bTAC) then
printf("According to the analysis, the finned exchanger is the most economically attractive device since the annual cost is the lowest.")
end
|
