| ESBCosec Function | 
Unit
QESBPCSMath
Declaration
Function ESBCosec(const Angle: Extended): Extended;
| Parameters | 
| Angle | Angle in Radians. | 
Category
Arithmetic Routines for FloatsImplementation
 
| function ESBCosec (const Angle: Extended): Extended;
var
     Y: Extended;
begin
     Y := Sin (Angle);
     if FloatIsZero (Y) then
          raise EMathError.Create (rsDivideByZero);
     Result := 1 / Y;
End; | 
|  |