summaryrefslogtreecommitdiff
path: root/2870/CH9/EX9.7/Ex9_7.sce
blob: e04eac5cde8f1a8b732a13c01a6054b7e01a080f (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
clc;clear;
//Example 9.7

//from 9.6
h2a=605.39;
h4a=880.36;
h3=1395.97;
Wnet=210.41;

//given data
n=0.80;

//calculations
// n = (h5 - h2a) / (h4a - h2a)
h5=(h4a - h2a)*n+h2a;
qin=h3-h5;
nth=Wnet/qin;
disp(nth,'thermal efficiency is')