ESBArCoth Function
Returns the inverse hyperbolic cotangent of X.

Unit
QESBPCSMath

Declaration
Function ESBArCoth(const X: Extended): Extended;

Parameters
Value to process.

Category
Arithmetic Routines for Floats

Implementation

function ESBArCoth (const X: Extended): Extended;
var
     Y: Extended;
begin
     if Abs (X) <= 1 then
          raise EMathError.Create (rsNotDefinedForValue);

     Y := (1 + X) / (X - 1);
     Result := 0.5 * Ln (Y);
End;


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