summaryrefslogtreecommitdiff
path: root/1709/CH7/EX7.1/7_1.sce
blob: 6343ae798c1ddcbd4fb6874dd93ccf96ff7d4f92 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
clc
//Initialization of variables
disp("Using gas tables,")
T1=1160 //R
h1=281.14 //B/lbm
Pr1=21.18 
P2=30 //psia
P1=100 //psia
//calculations
Pr2=Pr1*P2/P1
T2=833 //R
h2=199.45 //B/lbm
dh=h2-h1
//results
printf("Change in enthalpy = %.2f B/lbm",dh)