1362{
1363
1365#ifndef OM_NDEBUG
1366#ifndef __OPTIMIZE__
1368#else
1370#endif
1371#else
1373#endif
1375
1376#ifndef HAVE_NTL
1379#endif
1380
1382
1385
1387
1396
1398
1399#if 1
1400
1402 {
1404 #ifdef SINGULAR_4_2
1407 #endif
1408
1411
1414
1415 (void)type;
1416 }
1417#endif
1418
1419
1420 {
1422 if (t==0) t=1;
1428 }
1429
1430
1431
1432
1434
1435
1438
1439 {
1440 int cpus=2;
1441 int cpu_n;
1442 #ifdef _SC_NPROCESSORS_ONLN
1443 if ((cpu_n=sysconf(_SC_NPROCESSORS_ONLN))>cpus) cpus=cpu_n;
1444 #elif defined(_SC_NPROCESSORS_CONF)
1445 if ((cpu_n=sysconf(_SC_NPROCESSORS_CONF))>cpus) cpus=cpu_n;
1446 #endif
1448 char *env_cpu=
getenv(
"SINGULAR_CPUS");
1450 {
1451 int t=atoi(env_cpu);
1452 if ((t>=0)&&(t<cpus)) cpus=t;
1453 }
1455
1457 }
1458
1459
1460 {
1469
1470
1471
1472
1473 }
1474
1475
1476#ifdef HAVE_PLURAL
1483#endif
1484
1486 {
1492 }
1493
1494 #ifndef __CYGWIN__
1496 #endif
1498}
BOOLEAN naInitChar(coeffs cf, void *infoStruct)
Initialize the coeffs object.
BOOLEAN n2pInitChar(coeffs cf, void *infoStruct)
void factoryseed(int s)
random seed initializer
VAR void(* factoryError)(const char *s)
Class used for (list of) interpreter objects.
@ n_polyExt
used to represent polys as coefficients
@ n_Q
rational (GMP) numbers
@ n_algExt
used for all algebraic extensions, i.e., the top-most extension in an extension tower is algebraic
@ n_Zn
only used if HAVE_RINGS is defined
@ n_transExt
used for all transcendental extensions, i.e., the top-most extension in an extension tower is transce...
@ n_Z
only used if HAVE_RINGS is defined
coeffs nInitChar(n_coeffType t, void *parameter)
one-time initialisations for new coeffs in case of an error return NULL
void feInitResources(const char *argv0)
EXTERN_VAR BBA_Proc gnc_gr_bba
EXTERN_VAR BBA_Proc gnc_gr_mora
EXTERN_VAR BBA_Proc sca_gr_bba
EXTERN_VAR BBA_Proc sca_mora
EXTERN_VAR BBA_Proc sca_bba
ideal k_gnc_gr_bba(const ideal F, const ideal Q, const intvec *, const bigintmat *, kStrategy strat, const ring _currRing)
ideal k_gnc_gr_mora(const ideal F, const ideal Q, const intvec *, const bigintmat *, kStrategy strat, const ring _currRing)
int iiInitArithmetic()
initialisation of arithmetic structured data
idhdl enterid(const char *s, int lev, int t, idhdl *root, BOOLEAN init, BOOLEAN search)
int iiAddCproc(const char *libname, const char *procname, BOOLEAN pstatic, BOOLEAN(*func)(leftv res, leftv v))
BOOLEAN iiLibCmd(const char *newlib, BOOLEAN autoexport, BOOLEAN tellerror, BOOLEAN force)
ideal k_sca_bba(const ideal F, const ideal Q, const intvec *, const bigintmat *, kStrategy strat, const ring _currRing)
Modified modern Sinuglar Buchberger's algorithm.
ideal k_sca_gr_bba(const ideal F, const ideal Q, const intvec *, const bigintmat *, kStrategy strat, const ring _currRing)
Modified Plural's Buchberger's algorithmus.
ideal k_sca_mora(const ideal F, const ideal Q, const intvec *, const bigintmat *, kStrategy strat, const ring _currRing)
Modified modern Sinuglar Mora's algorithm.
poly k_NF(ideal F, ideal Q, poly p, int syzComp, int lazyReduce, const ring _currRing)
NOTE: this is just a wrapper which sets currRing for the actual kNF call.
static BOOLEAN iiCrossProd(leftv res, leftv args)
void omSingOutOfMemoryFunc()
static BOOLEAN iiFloat(leftv res, leftv pnn)
static void callWerrorS(const char *s)
void nRegisterCfByName(cfInitCfByNameProc p, n_coeffType n)
n_coeffType nRegister(n_coeffType n, cfInitCharProc p)
#define SI_SAVE_OPT(A, B)
#define SI_RESTORE_OPT(A, B)
coeffs nrnInitCfByName(char *s, n_coeffType)
#define SIPC_MAX_SEMAPHORES
INST_VAR sleftv sLastPrinted
BOOLEAN ntInitChar(coeffs cf, void *infoStruct)
Initialize the coeffs object.