blob: 645c9248ac9cc01417886c6308a0163f5d839af3 (
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
|
//Chapter-6, Illustration 4, Page 310
//Title: Refrigeration cycles
//=============================================================================
clc
clear
//INPUT DATA
P1=1.2;//Pressure at point 1 in bar
P2=7;//Pressure at point 2 in bar
m=0.05;//mass flow rate of refrigerant in kg/s
h1=340.1;//Enthalpy at point 1 from refrigerant-12 tables in kJ/kg
s1=1.57135;//Entropy at point 1 from refrigerant-12 tables in kJ/kg-K
s2=1.57135;//Entropy at point 2 from refrigerant-12 tables in kJ/kg-K
h2=372;//Enthalpy at point 2 from refrigerant-12 tables in kJ/kg
h3=226.575;//Enthalpy at point 3 from refrigerant-12 tables in kJ/kg
h4=226.575;//Enthalpy at point 4 from refrigerant-12 tables in kJ/kg
//CALCULATIONS
Q2=m*(h1-h4);//Rate of heat removed from the refrigerated space in kW
W=m*(h2-h1);//Power input to the compressor in kW
Q1=m*(h2-h3);//Rate of heat rejection to the environment in kW
COP=Q2/W;//Co-efficient of performance
//OUTPUT
mprintf('Rate of heat removed from the refrigerated space is %3.2f kW \n Power input to the compressor is %3.3f kW \n Rate of heat rejection to the environment is %3.2f kW \n Co-efficient of performance is %3.2f',Q2,W,Q1,COP)
//==============================END OF PROGRAM=================================
|