38f0dda8-9a1b-435f-83b5-d023fd863de6 59 4 5 decimal

&[DATE] &[TIME] - &[FILENAME]

Colebrook memo m ε 0.00003<ε>0.0001 ≡ m D Pipe ID(m) ≡ f friction factor [dimensionless] ≡ R Reynolds [dimensionless] ≡ ε D 12 mat in the same units system ≡ f 0.02 : initial guess all cases ≡ 61 line

Moody-Colebrook Diagram ...

Colebrook formula 1 f sqrt / 2.0 ε 3.71 D * / 2.51 R f sqrt * / + log10 * - ≡

f R D ε Find 1 f sqrt / 2.0 ε 3.71 D * / 2.51 R f sqrt * / + log10 * - ≡ f 0.015 0.035 solve :

Moody ε 0.00005 : R 10000100000020000 range : D 0.04 0.05 0.06 0.07 14 mat transpose : i 1 R rows range j 1 D rows range f i j el f R i el D j el ε Find : for for R f 1 col augment R f 2 col augment R f 3 col augment R f 4 col augment 41 mat 51 line :

t0 1 time :

isolate/store Moody Moody eval :

1 time t0 - min 2.6

CWD C:\SmathFile CurrentDirectory :

Moody CWD Moody wfile 1

Moody CWD Moody rfile :

Recommanded speed: Water: 0.1 .. 2.5 [m/s] Superheated steam: 35 ... 100 [m/s]

Moody 1 el Moody 2 el Moody 3 el Moody 4 el 4 1 sys

1 f sqrt / 2.0 ε 3.71 D * / 2.51 R f sqrt * / + log10 * - ≡

1 time t0 - min 2.6