The R Project SVN R

Rev

Rev 2484 | Rev 3076 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 2484 Rev 2629
Line 36... Line 36...
36 
 */
 36 
 */
37 
 
 37 
 
38 
#include "PrtUtil.h"
 38 
#include "PrtUtil.h"
39 
#include "Mathlib.h"
 39 
#include "Mathlib.h"
40 
 
 40 
 
41 
/* TRUE and FALSE conflict with the MAC */
 - 
 
42 
 
 - 
 
43 
#define LTRUE	1
 - 
 
44 
#define LFALSE	0
 - 
 
45 
 
 - 
 
46 
/* afc(i) :=  ln( i! )	[logarithm of the factorial i.
 41 
/* afc(i) :=  ln( i! )	[logarithm of the factorial i.
47 
 *	   If (i > 7), use Stirling's approximation, otherwise use table lookup.
 42 
 *	   If (i > 7), use Stirling's approximation, otherwise use table lookup.
48 
*/
 43 
*/
49 
 
 44 
 
50 
static double al[9] =
 45 
static double al[9] =