| 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; |
|
|