{$DS.}Function CLFE17(Ra,Pr) If (Ra<=1) or (Ra>=1E5) Then CALL ERROR ('El valor de Ra está fuera de rango.Comprueba Variable info en el menú Options',Ra) If (Pr<0.9) or (Pr>1.1) Then CALL ERROR ('El valor de Pr está fuera de rango, debe estar próximo a 1.Comprueba Variable info en el menú Options',Pr) CLFE17=2+0.43*Ra^(1/4) End