summaryrefslogtreecommitdiff
path: root/3685/CH16/EX16.11/Ex16_11.sce
diff options
context:
space:
mode:
Diffstat (limited to '3685/CH16/EX16.11/Ex16_11.sce')
-rw-r--r--3685/CH16/EX16.11/Ex16_11.sce19
1 files changed, 19 insertions, 0 deletions
diff --git a/3685/CH16/EX16.11/Ex16_11.sce b/3685/CH16/EX16.11/Ex16_11.sce
new file mode 100644
index 000000000..c9064da22
--- /dev/null
+++ b/3685/CH16/EX16.11/Ex16_11.sce
@@ -0,0 +1,19 @@
+clc
+// Refer table 16.4 for values
+T0 = 298 // Atmospheric temperature in K
+Wrev = -23316-3*(-394374)-4*(-228583) // Reversible work in kJ/kg mol
+Wrev_ = Wrev/44 // Reversible work in kJ/kg
+Hr = -103847 // Enthalpy of reactants in kJ/kg
+T = 980 // Through trial and error
+Sr = 270.019+20*205.142+75.2*191.611 // Entropy of reactants
+Sp = 3*268.194 + 4*231.849 + 15*242.855 + 75.2*227.485 // Entropy of products
+IE = Sp-Sr // Increase in entropy
+I = T0*3699.67/44 // Irreversibility
+Si = Wrev_ - I// Availability of products of combustion
+
+printf("\n Example 16.11 \n")
+printf("\n Reversible work is %f kJ/kg",Wrev_)
+printf("\n Increase in entropy during combustion is %f kJ/kg mol K",Sp-Sr)
+printf("\n Irreversibility of the process %f kJ/kg",I)
+printf("\n Availability of products of combustion is %f kJ/kg",Si)
+//The answers vary due to round off error