$SB1-X5.226 Z Function CFFE17(Re_max,Pr,C_1,C_2,m) If (Re_max<=2000) or (Re_max>=4E4) Then CALL ERROR ( 'El valor de Re_max está fuera de rango.Comprueba Variable info en el menú Options',Re_max) If(Pr<0.7) Then CALL ERROR ('El valor de Pr está fuera de rango.Comprueba Variable info en el menú Options',Pr) CFFE17=1.13*C_1*C_2*(Re_max^m)*Pr^(1/3) END