blob: d47ec3636b4ebab59ca61ee8b2124cf583d07322 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
clc
clear
//Initialization of variables
T=32 //F
m=1 //lbm
J=778.16
//calculations
disp("From steam tables,")
hf=0
p=0.08854 //psia
vf=0.01602 //ft^3/lbm
u=hf-p*144*vf/J
//results
printf("Internal energy = %.7f Btu/lbm",u)
|