summaryrefslogtreecommitdiff
path: root/2066/CH7/EX7.7.b/7_7b.sce
blob: dbf46a956c6e288fb4977ded41f2a65c00cc61ae (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
clc
clear
//Initialization of variables
D=36 //in
rho=0.00226  //slug/ft^3
mu=3.88e-7 //lb-sec/ft^2
umax=62.2 //ft/s
V=54.5 //ft/s
Nr=9.5e5
r0=18 //in
r=12 //in
n=8.8
k=0.4
//calculations
f=0.0032 + 0.221/(Nr^0.237)
Vs=sqrt(f/8) *V
y=r0-r
delta1=D*5*sqrt(8) /(Nr*sqrt(f))
vss=70
thick=13*delta1
//results
printf("Outer edge of buffer zone is at %d",vss)
printf("\n Thickness of buffer zone = %.4f in",thick)