1 #ifndef MPR_GLOBAL_H 2 #define MPR_GLOBAL_H 3 /**************************************** 4 * Computer Algebra System SINGULAR * 5 ****************************************/ 6 7 /* 8 * ABSTRACT - multipolynomial resultants - 9 * global definitions and debugging stuff 10 */ 11 12 // to get detailed timigs, define MPR_TIMING 13 //#define MPR_TIMING 14 15 // Set to double or long double. double is recomended. 16 // Sets the global floating point type used in mpr_numeric.cc. 17 typedef double mprfloat; 18 19 // --------------------------- debugging stuff ---------------------------- 20 #if !defined(SING_NDEBUG) 21 //#define mprDEBUG_ALL 22 #endif 23 24 #if !defined(SING_NDEBUG) || defined(mprDEBUG_ALL) 25 //#define mprDEBUG_PROT 26 #endif 27 28 #define mprDEBUG_STICKY 29 30 #ifdef mprDEBUG_PROT 31 #define mprPROT(msg) PrintS(msg) 32 #define mprPROTnl(msg) Print("%s\n",msg) 33 #define mprPROTP(msg,poly) PrintS(msg);pWrite0(poly) 34 #define mprPROTPnl(msg,poly) PrintS(msg);pWrite(poly) 35 #define mprPROTI(msg,intval) Print("%s%d",msg,intval) 36 #define mprPROTL(msg,intval) Print("%s%ld",msg,intval) 37 #define mprPROTInl(msg,intval) Print("%s%d\n",msg,intval) 38 #define mprPROTN(msg,nval) PrintS(msg);nPrint(nval); 39 #define mprPROTNnl(msg,nval) PrintS(msg);nPrint(nval);PrintLn(); 40 #else 41 #define mprPROT(msg) 42 #define mprPROTnl(msg) 43 #define mprPROTP(msg,poly) 44 #define mprPROTPnl(msg,poly) 45 #define mprPROTI(msg,intval) 46 #define mprPROTL(msg,intval) 47 #define mprPROTInl(msg,intval) 48 #define mprPROTN(msg,nval) 49 #define mprPROTNnl(msg,nval) 50 #endif 51 52 #if defined(mprDEBUG_STICKY) 53 // call 'option(prot);' to get status informations 54 #define mprSTICKYPROT(msg) if (BTEST1(OPT_PROT)) Print(msg) 55 #define mprSTICKYPROT2(msg,arg) if (BTEST1(OPT_PROT)) Print(msg,arg) 56 #else 57 #define mprSTICKYPROT(msg) 58 #define mprSTICKYPROT2(msg,arg) 59 #endif 60 61 // output by mprSTICKYPROT 62 #define ST_BASE_EV "." 63 64 #define ST_DENSE_FR ":" 65 #define ST_DENSE_NR "." 66 #define ST_DENSE_MEM "+" 67 #define ST_DENSE_NMON "-" 68 69 #define ST_SPARSE_MEM "+" 70 #define ST_SPARSE_VADD "+" 71 #define ST_SPARSE_VREJ "-" 72 #define ST_SPARSE_MPEND "e" 73 #define ST_SPARSE_MREC1 "r" 74 #define ST_SPARSE_MREC2 "R" 75 #define ST_SPARSE_RC "+" 76 #define ST_SPARSE_RCRJ "-" 77 78 #define ST__DET "|" 79 80 #define ST_ROOTS_LGSTEP "|" 81 #define ST_ROOTS_LGPOLISH "#" 82 #define ST_ROOTS_LG "-" 83 84 #define ST_VANDER_STEP "." 85 86 #endif 87 88 // local Variables: *** 89 // folded-file: t *** 90 // compile-command-1: "make installg" *** 91 // compile-command-2: "make install" *** 92 // End: *** 93