ESBCosec Function
Returns CoSecant of the Angle given in Radians.

Unit
QESBPCSMath

Declaration
Function ESBCosec(const Angle: Extended): Extended;

Parameters
Angle Angle in Radians.

Category
Arithmetic Routines for Floats

Implementation

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;


HTML generated by Time2HELP
http://www.time2help.com