blob: bdcc40cf708676d32e8f520ded4822724821ca87 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
clc
clear
//Initialization of variables
hb=29 //in of Hg
sg=0.491
Ra=53.3
Ta=460+40 //R
Tg=540+460 //R
H=300 //ft
gam=62.4 //lb/cu ft
//calculations
pb=hb*sg*144
rhoa=pb/(Ra*Ta)
rhog=pb/(Ra*Tg)
dp=H*(rhoa-rhog)
D=dp/(gam)
//results
printf("Theoretical draft = %.1f psf",dp)
printf("\n Draft = %.2f ft H2O",D)
|
