diff options
Diffstat (limited to '2762/CH3/EX3.5.1/3_5_1.sce')
| -rwxr-xr-x | 2762/CH3/EX3.5.1/3_5_1.sce | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/2762/CH3/EX3.5.1/3_5_1.sce b/2762/CH3/EX3.5.1/3_5_1.sce new file mode 100755 index 000000000..fb7720c55 --- /dev/null +++ b/2762/CH3/EX3.5.1/3_5_1.sce @@ -0,0 +1,18 @@ +//Transport Processes and Seperation Process Principles
+//Chapter 3//Example 3.5-1
+//Principles of Momentum Transfer and Applications
+//given data
+Kd=15.23;
+nd=0.4;
+D=0.0524;
+V=0.0728;
+L=14.9;
+rho=1041;
+delP=(Kd*4*L/D)*((8*V/D)^nd);//pressure drop
+Ff=delP/rho;//friction loss
+nd=0.4;
+g=8;
+Re=((D^nd)*(V^(2-nd))*rho)/(Kd*(g^(nd-1)));
+f=16/Re;//friction factor
+delP=4*f*rho*(L/D)*(V*V/2);
+mprintf("pressure drop= %f kN/m2",delP/1000)
|