From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 572/CH13/EX13.10/c13_10.sce | 26 ++++++++++++++++++++++++++
 1 file changed, 26 insertions(+)
 create mode 100755 572/CH13/EX13.10/c13_10.sce

(limited to '572/CH13/EX13.10')

diff --git a/572/CH13/EX13.10/c13_10.sce b/572/CH13/EX13.10/c13_10.sce
new file mode 100755
index 000000000..fc3c8493d
--- /dev/null
+++ b/572/CH13/EX13.10/c13_10.sce
@@ -0,0 +1,26 @@
+//(13.10)  Determine the change in entropy of the system of Example 13.6 in kJ/K.
+
+
+//solution
+Rbar = 8.314                                                                    //universal gas constant in SI units
+//The chemical equation for the complete combustion of methane with oxygen is
+//CH4 + 2O2 ---->  CO2 + 2H2O
+yCH4 = 1/3
+yO2 = 2/3
+yCO2 = 1/3
+yH2O = 2/3
+//from table A-25
+sbarCH4atTref = 186.16                                                          //in kj/kmol.K
+sbarO2atTref = 205.03                                                           //in kj/kmol.K
+
+sbarCH4 = sbarCH4atTref - Rbar*log(yCH4)
+sbarO2 = sbarO2atTref - Rbar*log(yO2)
+
+p2 = 3.02                                                                       //in atm
+pref = 1                                                                        //in atm
+//with help from table A-23
+sbarCO2 = 263.559 - Rbar*log(yCO2*p2/pref)                                      //in kj/kmol.K
+sbarH2O = 228.321 - Rbar*log(yH2O*p2/pref)                                      //in kj/kmol.K
+
+deltaS = sbarCO2 + 2*sbarH2O - sbarCH4 -2*sbarO2                                //in kj/K
+printf('the chenge in entropy of the system  in kJ/K is:  %f',deltaS)
\ No newline at end of file
-- 
cgit