summaryrefslogtreecommitdiff
path: root/3685/CH10/EX10.9/Ex10_9.sce
diff options
context:
space:
mode:
Diffstat (limited to '3685/CH10/EX10.9/Ex10_9.sce')
-rw-r--r--3685/CH10/EX10.9/Ex10_9.sce17
1 files changed, 17 insertions, 0 deletions
diff --git a/3685/CH10/EX10.9/Ex10_9.sce b/3685/CH10/EX10.9/Ex10_9.sce
new file mode 100644
index 000000000..614421677
--- /dev/null
+++ b/3685/CH10/EX10.9/Ex10_9.sce
@@ -0,0 +1,17 @@
+clc
+mo = 2 // mass of oxygen in kg
+mn = 6 // mass of nitrogen in kg
+muo = 32 // molecular mass of oxygen
+mun = 28 // molecular mass of nitrogen
+o = mo/muo // mass fraction of oxygen
+n = mn/mun // mass fraction of nitrogen
+xo = o/(n+o) // mole fraction of oxygen
+xn = n/(n+o) // mole fraction of nitrogen
+R = 8.314 // Universal gas constant
+Ro = R/muo // Gas constant for oxygen
+Rn = R/mun // Gas constant for nitrogen
+dS = -mo*Ro*log(xo)-mn*Rn*log(xn) // Increase in entropy
+
+printf("\n Example 10.9")
+printf("\n Increase in entropy is %f kJ/kg K",dS)
+//The answers vary due to round off error