1 files changed, 36 insertions, 0 deletions
diff --git a/2870/CH11/EX11.5/Ex11_5.sce b/2870/CH11/EX11.5/Ex11_5.sce
new file mode 100755
index 000000000..04421a22c
--- /dev/null
+++ b/2870/CH11/EX11.5/Ex11_5.sce
@@ -0,0 +1,36 @@
+clc;clear;
+//Example 11.5
+
+//given data
+m=0.1;
+T1=0+460;
+T3=80+460;//converting into R from F
+
+//from Table A–17E
+// at T1
+h1=109.90;
+Pr1=.7913;
+//pressure ratio at compressor is 4
+Pr2=4*Pr1;
+//at Pr2
+h2=163.5;
+T2=683;
+//at T3
+h3=129.06;
+Pr3=1.3860;
+//pressure ratio at compressor is 4
+Pr4=Pr3/4;
+//at Pr4
+h4=86.7;
+T4=363;
+
+//calculations
+qL=h1-h4;
+Wout=h3-h4;
+Win=h2-h1;
+COPR=qL/(Win-Wout);
+Qrefrig=m*qL;
+disp((T4-460),'the minimum temperatures in the cycle in F');
+disp((T2-460),'the maximum temperatures in the cycle in F');
+disp(COPR,'the coefficient of performance');
+disp(Qrefrig,'the rate of refrigeration for a mass flow rate of 0.1 lbm/s. in Btu/s')