blob: 0e5a30cee4ea152e91a0474f819bab6693964d25 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
|
//Chapter-6, Illustration 1, Page 308
//Title: Refrigeration cycles
//=============================================================================
clc
clear
//INPUT DATA
COP=8.5;//Co-efficient of performance
T1=300;//Room temperature in K
T2=267;//Refrigeration temperature in K
//CALCULATIONS
COPmax=T2/(T1-T2);//Maximum COP possible
//OUTPUT
mprintf('Maximum COP possible is %3.2f \n Since the COP claimed by the inventor is more than the maximum possible COP his claim is not correct',COPmax)
//==============================END OF PROGRAM=================================
|