1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
|
import sys;
from jas import Ring, PolyRing, ParamIdeal, QQ, ZM, RR
from jas import startLog, terminate
# Boolean coefficient boolean GB
# see S. Inoue and A. Nagai "On the Implementation of Boolean Groebner Bases" in ASCM 2009
# Z_2 regular ring coefficent example
r = PolyRing(RR(ZM(2),3),"a,x,y",PolyRing.lex);
print "r = " + str(r);
#print len(r.gens())
[s1,s2,s3,a,x,y] = r.gens();
one = r.one();
print "one = " + str(one);
print "s1 = " + str(s1);
print "s2 = " + str(s2);
print "s3 = " + str(s3);
print "a = " + str(a);
print "x = " + str(x);
print "y = " + str(y);
#brel = [ a**2 - a, x**2 - x, y**2 - y ];
brel = [ x**2 - x, y**2 - y ];
#print "brel = " + str(brel[0]) + ", " + str(brel[1]) + ", " + str(brel[2]);
print "brel = " + str(brel[0]) + ", " + str(brel[1]);
pl = [ ( one + s1 + s2 ) * ( x*y + x + y ), s1 * x + s1, a * y + a, x * y ];
pl = pl + brel;
startLog();
f = ParamIdeal(r,list=pl);
print "Ideal: " + str(f);
gb = f.regularGB();
print "boolean GB: " + str(gb);
#ss = gb.stringSlice();
#print "regular string slice: " + str(ss);
terminate();
#sys.exit();
|
