$SB1-X5.226
Î Function CFFE13(Re,Pr)
If (Re<=0.4) or (Re>=400000) Then CALL ERROR ('El valor de Re está fuera de rango.Comprueba Variable info en el menú Options',Re)
If (Re>0.4) and (Re<4) Then
C=0.989
m=0.330
EndIf
If (Re>=4) and (Re<40) Then
C=0.911
m=0.385
EndIf
If (Re>=40) and (Re<4000) Then
C=0.683
m=0.466
EndIf
If (Re>=4000) and (Re<40000) Then
C=0.193
m=0.618
EndIf
If (Re>=40000) Then
C=0.027
m=0.805
EndIf
CFFE13=C*Re^m*Pr^(1/3)
End
e-REdING. Biblioteca de la Escuela Superior de Ingenieros de Sevilla.
