(Centerline   velocity,(Subscript[v(x), r=0])/(Subscript[v, o]):
((v(r=0))/(Subscript[v, o]))(x/(Subscript[D, o]))=6.2(1)velocity   profile   at   any   x,(Subscript[v(r), x])/(Subscript[v(x), r=0]):
log[((Subscript[v(r), x])/(Subscript[v, o]))(x/D)]=0.79-33 ((r^2)/(x^2))(2)Flow   and   energy   at   any   x:(3)((Subscript[Q, x])/(Subscript[Q, o]))=0.32 (x/(Subscript[D, o]))(10.21)((Subscript[E, x])/(Subscript[E, o]))=4.1 ((Subscript[D, o])/x)(10.22))