blob: 553bb09a0de94612c59be9c77acbef338a37a018 (
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
|
//Transport Processes and Seperation Process Principles
//Chapter 1
//Example 1.7-2
//Introduction to engineering principles and units
//given data: CO + 0.5O2 -> CO2
//del H (298K)=-282.989*10^3 kJ/kg mol
//inlet flow rate= 1 kg mol/h=i
i=1;
it=0.5*i;// moles of O2 theorettically reqd
oa=it*(1.9);//moles of O2 actually added
n=oa*(0.79/0.21);//moles of N2 added
air=oa+n;
oout=oa-it;
// CO2 in outlet flue gas is 1 kg/h and N2 in outlet flue gas=n
//calculating input enthalpy of diff components from formula H= m*Cp*(delta T) and Cp evaluated from data tables
Hico=1*29.38*(473-298);
Hiair=4.520*29.29*(373-298);
Histd=-(-282.989*(10^3))*(1);
//calculating output enthalpy of diff components from formula H= m*Cp*(delta T) and Cp evaluated from data tables
HoCO2=1*49.91*(1273-298);
HoO2=oout*33.25*(1273-298);
HN2=n*31.43*(1273-298);
//Energy in=Energy out ; Hico+Hiair+q(heat added)+Histd=HoCO2+HoO2+HN2
q=HoCO2+HoO2+HN2-(Hico+Hiair+Histd);
mprintf("the heat removed in is %f kJ/h",q)
//end
|
