{$DS.}Function CLFE8(Ra,theta)
If (Ra<=100000) or (Ra>=1E11) Then CALL ERROR ('El valor de Ra está fuera de rango.Comprueba Variable info en el menú Options',Ra)
If (theta>=88) Then CALL ERROR ('El valor de theta está fuera de rango.Comprueba Variable info en el menú Options',theta)
CLFE8=0.56*(Ra*cos(theta))^(1/4)
End
e-REdING. Biblioteca de la Escuela Superior de Ingenieros de Sevilla.
