summaryrefslogtreecommitdiff
path: root/647/CH8/EX8.5/Example8_5.sce
blob: 64f7c310c8a8f33e0404b19f9b02cbf6a792591a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
clear;
clc;

// Example: 8.5
// Page: 299

printf("Example: 8.5 - Page: 299\n\n");

// Solution

//*****Data******//
Tl = -2 + 273;// [K]
Th = 20 + 273;// [K]
Qh = 80000;// [kJ/h]
//*************//

Ql = Qh*Tl/Th;// [kJ/h]
Wnet = Qh - Ql;// [kJ/h]
printf("Minimum Power input required is %.3f kW\n",Wnet/3600);