summaryrefslogtreecommitdiff
path: root/1460/CH7/EX7.1/7_1.sce
blob: 4614244d4c779fe4b3394275ee304aa9b751184b (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
clc
//initialization of variables
P1=160 //lb/in^2
T1=100 //F
P2=140 //lb/in^2
T2=550 //F
disp("From steam tables,")
h1=67.97 //B/lbm
h2=1299.3 //B/lbm
s1=0.1295 //B/lbm R
s2=1.6785 //B/lbm R
//calculations
dh=h2-h1
ds=s2-s1
//results
printf("Change in enthalpy = %.1f B/lbm",dh)
printf("\n Change in entropy = %.4f B/lbm R",ds)