summaryrefslogtreecommitdiff
path: root/3685/CH14/EX14.1/Ex14_1.sce
diff options
context:
space:
mode:
Diffstat (limited to '3685/CH14/EX14.1/Ex14_1.sce')
-rw-r--r--3685/CH14/EX14.1/Ex14_1.sce11
1 files changed, 11 insertions, 0 deletions
diff --git a/3685/CH14/EX14.1/Ex14_1.sce b/3685/CH14/EX14.1/Ex14_1.sce
new file mode 100644
index 000000000..924d336e6
--- /dev/null
+++ b/3685/CH14/EX14.1/Ex14_1.sce
@@ -0,0 +1,11 @@
+clc
+T2 = -5 // Cold storage temperature in degree Celsius
+T1 = 35 // Surrounding temperature in degree Celsius
+COP = (T2+273)/((T1+273)-(T2+273))
+ACOP = COP/3 // Actual COP
+Q2 = 29 // Heat leakage in kW
+W = Q2/ACOP
+printf("\n Example 14.1\n")
+printf("\n Power required to drive the plane is %f kW",W)
+//The answers vary due to round off error
+