From b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b Mon Sep 17 00:00:00 2001
From: priyanka
Date: Wed, 24 Jun 2015 15:03:17 +0530
Subject: initial commit / add all books

---
 551/CH14/EX14.9/9.sce | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)
 create mode 100755 551/CH14/EX14.9/9.sce

(limited to '551/CH14/EX14.9')

diff --git a/551/CH14/EX14.9/9.sce b/551/CH14/EX14.9/9.sce
new file mode 100755
index 000000000..e76b69765
--- /dev/null
+++ b/551/CH14/EX14.9/9.sce
@@ -0,0 +1,21 @@
+clc
+y=1.4;
+n=1.35;
+cp=1.003; //kJ/kg K
+p2=1; //bar
+p1=8; //bar
+T3=282; //K
+T4=302; //K
+T1=T4;
+T4=T3*(p1/p2)^((n-1)/n);
+T2=T1*(p2/p1)^((n-1)/n);
+
+Q1=cp*(T3-T2); //Heat extracted from cold chamber per kg of air
+Q2=cp*(T4-T1); //Heat rejected in the cooling chamber per kg of air
+cv=cp/y;
+R=cp-cv;
+W=n/(n-1)*R*((T4-T3) - (T1-T2));
+
+COP=Q1/W;
+disp("COP=")
+disp(COP)
\ No newline at end of file
-- 
cgit