blob: 57c2150e4c58aecf157a9f5f2aa7114f2f8c8749 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
|
//Chapter-6, Illustration 16, Page 323
//Title: Refrigeration cycles
//=============================================================================
clc
clear
//INPUT DATA
P1=25;//Pressure at point 1 in bar
P2=60;//Pressure at point 2 in bar
h2=208.1;//Vapour enthalpy at P2 in kJ/kg
h3=61.9;//Liquid enthalpy at P2 in kJ/kg
h4=h3;//Liquid enthalpy at P2 in kJ/kg
s2=0.703;//Vapour entropy at P2 in kJ/kg-K
sf1=-0.075;//Liquid entropy at P1 in kJ/kg-K
sfg1=0.971;//Entropy in kJ/kg-K
hf1=-18.4;//Liquid Enthalpy at P1 in kJ/kg
hfg1=252.9;//Latent heat at P1 in kJ/kg
m=5;//Refrigerant flow in kg/min
//CALCULATIONS
x1=(s2-sf1)/sfg1;//Quality factor 1
h1=hf1+(x1*hfg1);//Enthalpy at point 1 in kJ/kg
COP=(h1-h4)/(h2-h1);//Co-efficient of performance
QL=(m*(h1-h4))/60;//Capacity of the refrigerator in kW
//OUTPUT
mprintf('COP of refrigerator is %3.2f \n Capacity of refrigerator is %3.2f kW',COP,QL)
//==============================END OF PROGRAM=================================
|
