The R Project SVN R

Rev

Rev 1001 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 1001 Rev 1034
Line 7... Line 7...
7 
#include <float.h>
 7 
#include <float.h>
8 
#include <limits.h>
 8 
#include <limits.h>
9 
#include <math.h>
 9 
#include <math.h>
10 
#include <stdlib.h>
 10 
#include <stdlib.h>
11 
 
 11 
 
12 
/* (>=) 30 Decimal-place constants computed with bc (scale=32; proper round) */
 12 
/* 30 Decimal-place constants computed with bc -l (scale=32; proper round) */
13 
 
 13 
 
14 
#ifndef M_SQRT_2
 14 
#ifndef M_SQRT_2
15 
#define M_SQRT_2	1.4142135623730950488016887242097
 15 
#define M_SQRT_2	1.4142135623730950488016887242097
16 
#define M_1_SQRT_2	0.707106781186547524400844362105	/* 1/sqrt(2) */
 16 
#define M_1_SQRT_2	0.707106781186547524400844362105	/* 1/sqrt(2) */
17 
#define M_SQRT_32	5.656854249492380195206754896838	/* sqrt(32) */
 17 
#define M_SQRT_32	5.656854249492380195206754896838	/* sqrt(32) */
Line 60... Line 60...
60 
 
 60 
 
61 
#undef ML_PRECISION_WARNINGS
 61 
#undef ML_PRECISION_WARNINGS
62 
 
 62 
 
63 
#ifdef IEEE_754
 63 
#ifdef IEEE_754
64 
#ifdef HAVE_IEEE754_H
 64 
#ifdef HAVE_IEEE754_H
65 
#include <ieee754.h>
 65 
#include <ieee754.h> /* newer Linuxen */
66 
#else
 66 
#else
67 
#ifdef HAVE_IEEEFP_H
 67 
#ifdef HAVE_IEEEFP_H
68 
#include <ieeefp.h>
 68 
#include <ieeefp.h> /* others [Solaris 2.5.x], .. */
69 
#endif
 69 
#endif
70 
#endif
 70 
#endif
71 
 
 71 
 
72 
extern double m_zero;
 72 
extern double m_zero;
73 
extern double m_one;
 73 
extern double m_one;