beta.c

< C语言数值算法程序大全>>配套程序

#include <math.h>

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

	return exp(gammln(z)+gammln(w)-gammln(z+w));
}