blob: ced9eafecbbb95568e82be5b5bde09208fba4a7c (
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
|
//Chapter 13: Fuel and Combustions
//Problem: 13
clc;
//Declaration of Variables
C = 81 // %
H = 8 // %
N = 2 // %
O = 5 // %
// Solution
mprintf("In 1kg coal,\n")
wt_C = C * 10
wt_H = H * 10
wt_N = N * 10
wt_O = O * 10
wt_ash = 100 - (wt_O + wt_N + wt_H + wt_C)
wt_a = ((wt_C * 32 / 12. + wt_H * 16 / 2. - wt_O) * 100 / 23.) / 1000.
mprintf(" Weight of air required for complete combustion of 10kg coal = %.2f kg\n",wt_a * 10)
HCV = 1 / 100. * (8080 * C + 34500 * (H - O / 8.))
LCV = HCV - 0.09 * H * 587
mprintf(" HCV is %d kcal/kg\n",HCV)
mprintf(" LCV is %d kcal/kg\n",LCV)
|
