summaryrefslogtreecommitdiff
path: root/32/CH4/EX4.06/4_06.sce
blob: 4a1d409b518c30dde5cc09b63a1bf22ed2240e72 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
//pathname=get_absolute_file_path('4.06.sce')
//filename=pathname+filesep()+'4.06-data.sci'
//exec(filename)
//Inside temperature(in K):
T1=-15+273
//Atmospheric temperature(in K):
T2=35+273
//Heat to be extracted (in kW):
Q2=140.8
//Carnot COP of plant:
COP1=1/(T2/T1-1)
//Actual COP:
COP=COP1/4
//Power required(in kW):
W=Q2/COP
printf("\nRESULTS\n")
printf("\nPower required = %f kW",W)