version 1.35, 2006/12/21 05:29:49 |
version 1.37, 2015/09/29 01:52:14 |
|
|
/* global.c $OpenXM: OpenXM/src/kan96xx/Kan/global.c,v 1.34 2005/06/15 02:22:50 takayama Exp $ */ |
/* global.c $OpenXM: OpenXM/src/kan96xx/Kan/global.c,v 1.36 2011/10/05 05:46:14 takayama Exp $ */ |
#include <stdio.h> |
#include <stdio.h> |
#include <setjmp.h> |
#include <setjmp.h> |
#include "datatype.h" |
#include "datatype.h" |
Line 79 int Commutative = 0; |
|
Line 79 int Commutative = 0; |
|
int UseCriterion1 = 0; |
int UseCriterion1 = 0; |
int UseCriterion2B = 0; |
int UseCriterion2B = 0; |
int OutputStyle = '*'; |
int OutputStyle = '*'; |
|
int COutput = 0; /* C sytle output of polynomial */ |
int Wrap = 0; /* output.c */ |
int Wrap = 0; /* output.c */ |
int Verbose = 0; |
int Verbose = 0; |
int ReduceLowerTerms = 1; |
int ReduceLowerTerms = 1; |
Line 160 FILE *Fk = NULL; /* Initialized to stdout in stackmac |
|
Line 161 FILE *Fk = NULL; /* Initialized to stdout in stackmac |
|
stackmachine_init() { |
stackmachine_init() { |
int i,j; |
int i,j; |
extern FILE *BaseFp; |
extern FILE *BaseFp; |
GC_init(); |
/* GC_init(); */ |
|
GC_INIT(); |
OxSystemVersion = VersionString; |
OxSystemVersion = VersionString; |
Fstack = stdout; /* initialize output stream */ |
Fstack = stdout; /* initialize output stream */ |
Fk = stdout; |
Fk = stdout; |