blob: 0d40f0d811330e9ef4140d2a077fabbd585cdb5f (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
clc;
warning("off");
printf("\n\n example10.14 - pg459");
// given
l=0.09238;
rh=0.1624*l;
L=300;
de=4*rh;
p=1000; //[kg/m^3]
mu=10^-3; //[kg/m*sec]
Uavg=1.667;
Nre=(de*Uavg*p)/mu;
f=0.0053;
deltap=((4*f*L)/de)*(p*(Uavg^2)*(1/2));
printf("\n\n -deltap = %e kg/m*s = %e N/m^2 = %f kPa",deltap,deltap,deltap*10^-3);
|
