diff options
Diffstat (limited to '2417/CH10/EX10.9/Ex10_9.sce')
-rwxr-xr-x | 2417/CH10/EX10.9/Ex10_9.sce | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/2417/CH10/EX10.9/Ex10_9.sce b/2417/CH10/EX10.9/Ex10_9.sce new file mode 100755 index 000000000..c282b6864 --- /dev/null +++ b/2417/CH10/EX10.9/Ex10_9.sce @@ -0,0 +1,19 @@ +//scilab 5.4.1
+clear;
+clc;
+printf("\t\t\tProblem Number 10.9\n\n\n");
+// Chapter 10 : Refrigeration
+// Problem 10.9 (page no. 518)
+// Solution
+
+//From Appendix 3,using the HFC-134a tables, enthalpies are
+h1=41.6; //Unit:Btu/lbm //enthalpy
+h2=41.6; //Unit:Btu/lbm //Throttling gives h1=h2 //enthalpy
+h3=104.6; //Unit:Btu/lbm //enthalpy
+//From the consideration that s3=s4,
+s3=0.2244; //Unit:Btu/(lbm*F) //s=entropy
+h4=116.0; //Unit:Btu/lbm //enthalpy
+printf("The heat extracted is %f Btu/lbm\n\n",h3-h1);
+printf("The work required is %f Btu/lbm\n\n",h4-h3);
+COP=(h3-h1)/(h4-h3); //Coefficient of performance
+printf("The Coefficient of performance(COP) of this ideal cycle is %f",COP);
|