{$DS.}Function CLFI7(Ra,B) If (B<0.75) or (B>2) Then CALL ERROR ('El valor de B está fuera de rango.Comprueba Variable info en el menú Options',B) CLFI7=0.55*Ra^(1/4) End