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