| LnBeta Function | 
Unit
QESBPCSMath
Declaration
Function LnBeta(const X, Y: Extended): Extended;
Description
X and Y must be positive.
Accuracy: Gives about 15 digits.
| Parameters | 
| X | First Value to process. | 
| Y | Second Value to process. | 
Category
Arithmetic Routines for FloatsImplementation
 
| function LnBeta (const X, Y: Extended): Extended;
begin
     if not FloatIsPositive (X) or not FloatIsPositive (Y) then
          raise EMathError.Create (rsNotDefinedForValue);
     Result := LnGamma (X) + LnGamma (Y) - LnGamma (X + Y);
End; | 
|  |