The R Project SVN R

Rev

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

Rev 2429 Rev 2631
Line 42... Line 42...
42
#ifdef huge
42
#ifdef huge
43
#undef huge
43
#undef huge
44
#endif
44
#endif
45
 
45
 
46
#define TRUE    (1)
46
#define TRUE    (1)
47
 
-
 
48
#define FALSE   (0)
47
#define FALSE   (0)
49
 
48
 
-
 
49
#ifndef _STDLIB_H
50
#define abs(x) ((x) >= 0 ? (x) : -(x))
50
#define abs(x) ((x) >= 0 ? (x) : -(x))
-
 
51
#endif
51
/* #define dabs(x) (double)abs(x) */
52
/* #define dabs(x) (double)abs(x) */
52
#define min(a,b) ((a) <= (b) ? (a) : (b))
53
#define min(a,b) ((a) <= (b) ? (a) : (b))
53
#define max(a,b) ((a) >= (b) ? (a) : (b))
54
#define max(a,b) ((a) >= (b) ? (a) : (b))
54
#define dmin(a,b) (double)min(a,b)
55
#define dmin(a,b) (double)min(a,b)
55
#define dmax(a,b) (double)max(a,b)
56
#define dmax(a,b) (double)max(a,b)