blob: f14ebb69def06feda3cc6af3cd678c25bae7ed37 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
|
//clear//
clear;
clc;
//Example 9.2
//Given
Dt = 6; //[ft]
h = 2; //[ft]
n = 90/60; //[rps]
mu = 12*6.72*10^-4; //[lb/ft-s]
g = 32.17; //[ft/s^2]
rho = 93.5; //[lb/ft^3]
Da = 2; // [ft]
Nre = Da^2*n*rho/mu;
//Froude number
Nfr = n^2*Da/g;
//From Table 9.1
a = 1;
b = 40.0;
//Using Eq.(9.19)
m = (a-log(Nre)/2.303)/b;
//Using Fig. 9.12, curve D,
Np = 1.07;
//Corrected valus of Np
Np = Np*Nfr^m;
//Form Eq.(9.20)
P = Np*rho*n^3*Da^5/g //[ft-lbf/s]
P = P/550 //[hp]
|
