diff options
Diffstat (limited to '3685/CH7/EX7.8/Ex7_8.sce')
| -rw-r--r-- | 3685/CH7/EX7.8/Ex7_8.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/3685/CH7/EX7.8/Ex7_8.sce b/3685/CH7/EX7.8/Ex7_8.sce new file mode 100644 index 000000000..3d022cc8a --- /dev/null +++ b/3685/CH7/EX7.8/Ex7_8.sce @@ -0,0 +1,15 @@ +clc
+Pa = 130 // Pressure at station A in kPa
+Pb = 100// Pressure at station B in kPa
+Ta = 50 // Temperature at station A in degree Celsius
+Tb = 13// Temperature at station B in degree Celsius
+cp = 1.005 // Specific heat capacity of air in kJ/kgK
+
+printf("\n Example 7.8")
+Ss = integrate('cp/T','T',Ta,Tb)-integrate('0.287/p','p',Pa,Pb)
+Ssur = 0
+Su = Ss+Ssur
+printf("\n Change in the entropy of the universe is %f kJ/Kg K",Su)
+//The answers given in the book is wrong
+printf("\n As the change in entropy of the universe in the process A-B is negative \n so the flow must be from B-A")
+
|