blob: ee4bcdf7b936f8c56f0305c5a0459b29e3f4e83b (
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
|
//Chapter-6, Illustration 3, Page 309
//Title: Refrigeration cycles
//=============================================================================
clc
clear
//INPUT DATA
TL=-10;//Temperature of brine in oC
TH=20;//Temperature of water in oC
L=335;//Latent heat of ice in kJ/kg
//CALCULATIONS
Qr=(4.187*(TH-0))+L;//Heat removed from water in kJ/kg
COP=(TL+273)/(TH-TL);//Co-efficient of performance
mi=(COP*3600)/Qr;//mass of ice formed per kWh in kg
//OUTPUT
mprintf('Mass of ice formed per kWh is %3.1f kg',mi)
//==============================END OF PROGRAM=================================
|
