summaryrefslogtreecommitdiff
path: root/647/CH5/EX5.6/Example5_6.sce
blob: 566db3e3540aa1a26cd895323adf9533b7cbc53d (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
clear;
clc;

// Example: 5.6
// Page: 153

printf("Example: 5.6 - Page: 153\n\n");

// Solution

//*****Data*****//
W = 5;// [hp]
Q = 7000;// [J/s]
Th = 400 + 273;// [K]
Tl = 24 + 273;// [K]
//*************//

W = 5*745.7;// [W]
thermal_eta = W/Q;
theoretical_eta = (Th - Tl)/Th;

if theoretical_eta <= thermal_eta
    printf("Claim is Valid");
else
    printf("Claim is not Valid");
end