diff options
Diffstat (limited to '3685/CH6/EX6.1/Ex6_1.sce')
| -rw-r--r-- | 3685/CH6/EX6.1/Ex6_1.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/3685/CH6/EX6.1/Ex6_1.sce b/3685/CH6/EX6.1/Ex6_1.sce new file mode 100644 index 000000000..913e36b47 --- /dev/null +++ b/3685/CH6/EX6.1/Ex6_1.sce @@ -0,0 +1,12 @@ +clc
+T1 = 800 // Source temperature in degree Celsius
+T2 = 30 // Sink temperature in degree Celsius
+e_max = 1-((T2+273)/(T1+273)) // maximum possible efficiency
+Wnet = 1 // in kW
+Q1 = Wnet/e_max // Least rate of heat required in kJ/s
+Q2 = Q1-Wnet // Least rate of heat rejection kJ/s
+
+printf("\n Example 6.1")
+printf("\n Least rate of heat rejection is %f kW",Q2)
+//The answers vary due to round off error
+
|