beta.c

来自「Numerical Recipes Software 提供的算法子程序集」· C语言 代码 · 共 11 行

#include <math.h>

float beta(z,w)
float w,z;
{
	float gammln();

	return exp(gammln(z)+gammln(w)-gammln(z+w));
}
/* (C) Copr. 1986-92 Numerical Recipes Software . */