(                f(t)=1.1281(Sqrt[(Subscript[t, Dw])])(1-0.3(Sqrt[(Subscript[t, Dw])]))   when   (Subscript[t, Dw])≤1.5(Equation   6)or   f(t)=[0.4063+0.5ln((Subscript[t, Dw]))](1+(0.6/(Subscript[t, Dw])))   when   (Subscript[t, Dw])>1.5,(Equation   7))