{$DS.}Function CLFI3(Ra,C,theta)
If (theta>180) or (theta<=90) Then CALL ERROR ('El valor de theta está fuera de rango.Comprueba Variable info en el menú Options',theta)
CLFI3=1+(CLFI2(Ra,C)-1)*sin(theta)
End
e-REdING. Biblioteca de la Escuela Superior de Ingenieros de Sevilla.