summaryrefslogtreecommitdiff
path: root/2024/CH6/EX6.7/6_7.sce
blob: 5311e762ba2574b9837f3d426875cecfb4984a4c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
clc
//Initialization of variables
sf=0.12948
dt=0.32 //F
t1=100 //F
x=0.6
//calculations
t2=t1+dt
hf=67.97
ht=2.7
hp=0.3
h2=hf+ht+hp
Wrev=hf-h2
Wact=Wrev/x
//results
printf("Actual work done = %.1f Btu/lbm",Wact)