/*
 $Id: clustr_inv.h 19708 2010-10-29 18:04:21Z d3y133 $
*/

#define max(a,b) ((a) > (b) ? (a) : (b))
#define min(a,b) ((a) < (b) ? (a) : (b))

/*
#define fabs(a)   ((a) < (DoublePrecision) 0.0e0 ? (- a): (a))
*/


#define ZERO (DoublePrecision) 0.0e0
#define ONE  (DoublePrecision) 1.0e0
#define TEN  (DoublePrecision) 1.0e1
#define ODM3 (DoublePrecision) 1.0e-3
#define ODM1 (DoublePrecision) 1.0e-1
#define EXTRA 1
#define KK    2
#define MAXITS 5
#define TWO  2
#define EEPS 1.1102230246251565e-16



