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 --- 1775/CH6/EX6.5/Chapter6_Example5.sce | 30 ++++++++++++++++++++++++++++++ 1 file changed, 30 insertions(+) create mode 100755 1775/CH6/EX6.5/Chapter6_Example5.sce (limited to '1775/CH6/EX6.5/Chapter6_Example5.sce') diff --git a/1775/CH6/EX6.5/Chapter6_Example5.sce b/1775/CH6/EX6.5/Chapter6_Example5.sce new file mode 100755 index 000000000..abfbbad8e --- /dev/null +++ b/1775/CH6/EX6.5/Chapter6_Example5.sce @@ -0,0 +1,30 @@ +//Chapter-6, Illustration 5, Page 311 +//Title: Refrigeration cycles +//============================================================================= +clc +clear + +//INPUT DATA +T2=40;//Temperature at point 2 in oC +T1=-10;//Temperature at point 1 in oC +h2=367.155;//Enthalpy at point 2 from refrigerant-12 tables in kJ/kg +s2=1.54057;//Entropy at point 2 from refrigerant-12 tables in kJ/kg-K +s1=1.54057;//Entropy at point 1 from refrigerant-12 tables in kJ/kg-K +sg=1.56004;//Entropy from refrigerant-12 tables in kJ/kg-K +sf=0.96601;//Entropy from refrigerant-12 tables in kJ/kg-K +hf=190.822;//Enthalpy from refrigerant-12 tables in kJ/kg-K +hfg=156.319;//Enthalpy from refrigerant-12 tables in kJ/kg-K +h3=238.533;//Enthalpy at point 3 from refrigerant-12 tables in kJ/kg-K +h4=h3;//Enthalpy at point 4 from refrigerant-12 tables in kJ/kg-K + +//CALCULATIONS +x1=(s1-sf)/(sg-sf);//Quality factor +h1=hf+(x1*hfg);//Enthalpy at point 1 from refrigerant-12 tables in kJ/kg +COP=(h1-h4)/(h2-h1);//Co-efficient of performance + +//OUTPUT +mprintf('COP of the system is %3.2f',COP) + + + +//==============================END OF PROGRAM================================= -- cgit