blob: 52bad02be6af7adcaa49cf9b0a481ce6f6983227 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
//clc()
m = 1;//kg of coal burned
xc = 0.7;
xh2 = 0.055;
xn2 = 0.015;
xs = 0.03;
xo = 0.13;
xash = 0.07;
Hvap = 2370;//kJ/kg
C = 29000;//kJ/kg
Nh2 = xh2 * m / 2.016;
Nwater = Nh2;// ( amount of water formed )
mwater = Nwater * 18.016;
Hreq = mwater * Hvap;
Hnet = C - Hreq;
disp("kJ/kg",Hnet,"Net heating value of coal = ")
|
