summaryrefslogtreecommitdiff
path: root/632/CH10/EX10.4/example10_4.sce
diff options
context:
space:
mode:
Diffstat (limited to '632/CH10/EX10.4/example10_4.sce')
-rwxr-xr-x632/CH10/EX10.4/example10_4.sce23
1 files changed, 23 insertions, 0 deletions
diff --git a/632/CH10/EX10.4/example10_4.sce b/632/CH10/EX10.4/example10_4.sce
new file mode 100755
index 000000000..848996823
--- /dev/null
+++ b/632/CH10/EX10.4/example10_4.sce
@@ -0,0 +1,23 @@
+//clc()
+Nflue = 100;//kmoles
+NCO2 = 9.05;
+NCO = 1.34;
+NO2 = 9.98;
+NN2 = 79.63;
+PCO2F = 9.2;//% ( Feed )
+PCOF = 21.3;//%
+PH2F = 18;//%
+PCH4F = 2.5;//%
+PN2F = 49;//%
+//Taking carbon balance,
+F = (NCO2 + NCO )/ ( (PCO2F + PCOF + PCH4F)/100);
+//Nitrogen balance gives,
+Nair = (NN2 - F*PN2F/(100) )* 100 / 79;
+R = Nair/F;
+disp(R,"(a)molar Ratio of air to fuel = ")
+Oexcess = NO2 - NCO / 2;
+Pexcess = Oexcess *100/ (Nair*21/100 - Oexcess);
+disp("%",Pexcess,"(b)Percent excess of air = ")
+NN2F = F * PN2F / 100;
+PN2F = NN2F *100/ NN2;
+disp("%",PN2F,"(c)Percent of nitrogen in the flue gas that came from fuel = ") \ No newline at end of file