blob: b5936d4a742c80825f5adce9674b8be9d53bf09e (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
clc
clear
//Initialization of variables
disp("From table 2 of keenan and keynes,")
p1=98.87 //psia
p2=31.78 //psia
t1=80 //F
h2=26.365 //btu/lb
h1=11.554 //btu/lb
hfg=67.203 //btu/lb
//calculations
x=(h2-h1)/hfg
//results
printf("The state of vapor leaving is %.2f psia with a quality of %.2f percent",p2,x*100)
|