21886bb6 |
1 | * |
2 | * $Id$ |
3 | * |
4 | * $Log$ |
5 | * Revision 1.1.1.2 1996/10/30 08:27:39 cernlib |
6 | * Version 7.04 |
7 | * |
8 | * Revision 1.1.1.1 1996/04/12 15:29:04 plothow |
9 | * Version 7.01 |
10 | * |
11 | * |
12 | #include "pdf/pilot.h" |
13 | C |
14 | FUNCTION BETA(X,Y) |
15 | BETA=GAMMA(X)*GAMMA(Y)/GAMMA(X+Y) |
16 | RETURN |
17 | END |