diff options
Diffstat (limited to '3685/CH8/EX8.2')
| -rw-r--r-- | 3685/CH8/EX8.2/Ex8_2.sce | 19 | ||||
| -rw-r--r-- | 3685/CH8/EX8.2/Ex8_2.txt | 3 |
2 files changed, 22 insertions, 0 deletions
diff --git a/3685/CH8/EX8.2/Ex8_2.sce b/3685/CH8/EX8.2/Ex8_2.sce new file mode 100644 index 000000000..c8d2a4cd9 --- /dev/null +++ b/3685/CH8/EX8.2/Ex8_2.sce @@ -0,0 +1,19 @@ + +clc
+lhw = 1858.5 // Latent heat of water in kJ/kg
+Tew = 220 // Water evaporation temperature in degree Celsius
+
+Tig = 1100 // Initial temperature of the gas in degree Celsius
+Tfg = 550 // Final temperature of the gas in degree Celsius
+T0 = 303 // Atmospheric temperature in degree Celsius
+Tg2 = 823
+Tg1 = 1373
+printf("\n Example 8.2")
+Sw = lhw/(Tew+273) // Entropy generation in water
+Sg = integrate('3.38/T','T',Tg1,Tg2)
+St = Sg+Sw
+printf("\n Total change in entropy is %f kJ/K",St)
+
+printf("\n Increase in unavailable energy is %d kJ",T0*St)
+//The answers vary due to round off error
+
diff --git a/3685/CH8/EX8.2/Ex8_2.txt b/3685/CH8/EX8.2/Ex8_2.txt new file mode 100644 index 000000000..1775d33a0 --- /dev/null +++ b/3685/CH8/EX8.2/Ex8_2.txt @@ -0,0 +1,3 @@ + Example 8.2
+ Total change in entropy is 2.039902 kJ/K
+ Increase in unavailable energy is 618 kJ
\ No newline at end of file |