summaryrefslogtreecommitdiff
path: root/3685/CH8/EX8.9
diff options
context:
space:
mode:
Diffstat (limited to '3685/CH8/EX8.9')
-rw-r--r--3685/CH8/EX8.9/Ex8_9.sce18
-rw-r--r--3685/CH8/EX8.9/Ex8_9.txt4
2 files changed, 22 insertions, 0 deletions
diff --git a/3685/CH8/EX8.9/Ex8_9.sce b/3685/CH8/EX8.9/Ex8_9.sce
new file mode 100644
index 000000000..9bb623331
--- /dev/null
+++ b/3685/CH8/EX8.9/Ex8_9.sce
@@ -0,0 +1,18 @@
+clc
+T2 = 790 // Final temperature of gas in degree Celsius
+T1 = 800 // Initial temperature of gas in degree Celsius
+m = 2 // Mass flow rate in kg/s
+cp = 1.1 // Specific heat capacity in kJ/KgK
+T0 = 300 // Ambient temperature in K
+
+printf("\n Example 8.9")
+I = m*cp*(((T1+273)-(T2+273))-T0*(log((T1+273)/(T2+273)))) // irreversibility rate
+printf("\n The irreversibility rate is %f kW",I)
+
+// At lower temperature
+T1_ = 80 // Initial temperature of gas in degree Celsius
+T2_ = 70 // Initial temperature of gas in degree Celsius
+I_ = m*cp*(((T1_+273)-(T2_+273))-T0*(log((T1_+273)/(T2_+273)))) // irreversibility rate
+printf("\n The irreversibility rate at lower temperature is %f kW",I_)
+//The answers vary due to round off error
+
diff --git a/3685/CH8/EX8.9/Ex8_9.txt b/3685/CH8/EX8.9/Ex8_9.txt
new file mode 100644
index 000000000..8d2a562e4
--- /dev/null
+++ b/3685/CH8/EX8.9/Ex8_9.txt
@@ -0,0 +1,4 @@
+
+ Example 8.9
+ The irreversibility rate is 15.820180 kW
+ The irreversibility rate at lower temperature is 3.033178 kW \ No newline at end of file