summaryrefslogtreecommitdiff
path: root/2066/CH7/EX7.8/7_8.sce
blob: 7bbe6e55e6b815d85cc186987b180e144fd62224 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
clc
clear
//Initialization of variables
umax=62.2 //ft/s
r0=18 //in
e=0.0696 //in
r=6 //in
//calculations
Vs=umax/(8.5 + 5.75*log10(r0/e))
u=Vs*(8.5 + 5.75*log10(r/e))
//results
printf("Velocity = %.1f ft/s",u)