1460/CH3/EX3.1/3_1.sce


1
2
3
4
5
6
7
8
9
10

clc
//initialization of variables
P=80 //lb/in^2
x=0.9 //quality
hg=1183.1 //B/lbm
hfg=901.1 //B/lbm
//calculations
h=hg-(1-x)*hfg
//results
printf("Enthalpy of steam = %.1f B/lbm",h)