                     SINGULAR                                 /
 A Computer Algebra System for Polynomial Computations       /   version 3-1-6
                                                           0<
 by: W. Decker, G.-M. Greuel, G. Pfister, H. Schoenemann     \   Dec 2012
FB Mathematik der Universitaet, D-67653 Kaiserslautern        \
STDIN   1> //
STDIN   2. // version 2013
STDIN   3. //
STDIN   4. timer=1;
STDIN   5> //ring r=(integer,6),(u,v,a),(dp(2),lp);
STDIN   6. ring r=(integer,6),(u,v,a),dp;
STDIN   7> int b=0;
STDIN   8> matrix Z[5][5]; Z=Z+1;
STDIN   9> execute(read("fu_dataL.sing"));
STDIN  10> matrix tauL[1][5]; tauL=gen(1)*(1, b*v-a+u, 1, 1, a*u-b+v);
STDIN  11> matrix Z[315][315]; Z=Z+1;
// ** redefining Z **
STDIN  12> execute(read("fu_data0.sing"));
//used time: 2.52 sec
//used time: 0.62 sec
//used time: 0.64 sec
//used time: 2.30 sec
//used time: 7.77 sec
//used time: 0.70 sec
//used time: 7.50 sec
//used time: 6.82 sec
//used time: 0.62 sec
//used time: 0.77 sec
//used time: 6.85 sec
//used time: 14.02 sec
//used time: 1.08 sec
//used time: 13.56 sec
//used time: 4.56 sec
//used time: 0.68 sec
//used time: 1.09 sec
//used time: 1.16 sec
//used time: 4.34 sec
//used time: 12.83 sec
//used time: 1.16 sec
//used time: 12.46 sec
//used time: 9.82 sec
//used time: 0.84 sec
//used time: 1.14 sec
//used time: 9.87 sec
//used time: 10.84 sec
//used time: 0.83 sec
//used time: 10.54 sec
//used time: 3.63 sec
STDIN  13> matrix t = matrix(rho(0),315,315);
STDIN  14> matrix t2=t*t;
STDIN  15> matrix t3=t2*t;
STDIN  16> module m=t3;
STDIN  17> matrix tau=m;
STDIN  18> vector vec=transpose(tau)[1];
STDIN  19> matrix tau[1][315]=vec;
// ** redefining tau **
STDIN  20> matrix mJ40 = matrix(J40,315,size(J40));
STDIN  21> 
STDIN  22. ideal IL; ideal I;
STDIN  23> IL=tauL*matrix(L0,5,size(L0)); IL=std(IL);
STDIN  24> 
STDIN  25. I=tau*matrix(J40,315,size(J40));
STDIN  26> I=std(I);
STDIN  27> 
STDIN  28. I=reduce(I,IL);
STDIN  29> I=I,IL; I=std(I);
STDIN  30> 
STDIN  31. ideal I1=I; ideal I2; int change=1; int i; int j; poly f; int count=0;
STDIN  32> while(change){change=0; count++;
STDIN  34.   for(i=1; i<=size(I1); i++){I2=0; 
STDIN  36.     for(j=1; j<=size(I1); j++){ if(j!=i){I2=I2,I1[j];}}
STDIN  38.     f=reduce(I1[i],I2);
STDIN  40.     if(f!=I1[i]){change=1; I1=I2,f; I1=std(I1); break;}
STDIN  42.   }
STDIN  44. }
// ** I2 is no standard basis
// ** I2 is no standard basis
// ** I2 is no standard basis
// ** I2 is no standard basis
// ** I2 is no standard basis
// ** I2 is no standard basis
// ** I2 is no standard basis
// ** I2 is no standard basis
// ** I2 is no standard basis
// ** I2 is no standard basis
// ** I2 is no standard basis
// ** I2 is no standard basis
// ** I2 is no standard basis
// ** I2 is no standard basis
// ** I2 is no standard basis
// ** I2 is no standard basis
STDIN  45> I=I1;
STDIN  46> 
STDIN  47. matrix Z5[5][5]; Z5=Z5+1;
STDIN  48> 
STDIN  49. int i;
// ** redefining i **
STDIN  50> module mL=L0;
STDIN  51> for(i=1; i<=size(I); i++){mL=mL,module(I[i]*Z5);}
STDIN  52> mL=std(mL);
STDIN  53> 
STDIN  54. module m1L=mL;
STDIN  55> for( int i=0; i<9; i++ ){mL=mL,matrix(rhoL(i),5,5)*matrix(m1L,5,size(m1L));}
// ** redefining i **
STDIN  56> mL=groebner(mL);
STDIN  57> ideal I1L;
STDIN  58> I1L=tauL*matrix(mL,5,size(mL)); I1L=std(I1L);
STDIN  59> I1L=reduce(I1L,I);
STDIN  60> I1L;
I1L[1]=0
I1L[2]=0
I1L[3]=0
I1L[4]=0
I1L[5]=0
I1L[6]=0
I1L[7]=uv3a+5v3a2+3ua4+3u3v+v4+3va3+uv2+v2a+3v
I1L[8]=u2v2a+5v2a3+u4+uv3+4v3a+3ua3+3a4+5u2v+uva+5va2+2v2+5u+2a
I1L[9]=u3va+3v4a+v2a2+u3+5v3+3a3+3uv+2va+3
I1L[10]=u4a+uv3a+2v3a2+3ua4+3a5+4v4+5u2va+4uv2+2v2a+3ua
I1L[11]=0
I1L[12]=ua5+4uv4+2v4a+uv2a+2v2a2+3u3+3v3+5ua2+2a3+5uv+5va+5
I1L[13]=ua5+4uv4+2v4a+3uv2a+3u3+5v3+5ua2+2a3+uv+va+5
I1L[14]=v4a2+4uv3+3u3a+v3a+a4+3uva+va2+4u+3a
I1L[15]=v5a+5u5+5u2v3+5ua4+4a5+5v4+5u2va+3uv2+2v2a+u2+2ua+4a2+5v
I1L[16]=0
I1L[17]=0
I1L[18]=u6+v6+4v4a+3u2v2+3uv2a+4v2a2+5u3+5v3+ua2+2a3+3uv+3va+2
I1L[19]=0
STDIN  61> 
STDIN  62. I=I,I1L; I=std(I);
STDIN  63> 
STDIN  64. module m1L=mL;
// ** redefining m1L **
STDIN  65> module m2L=m1L;
STDIN  66> 
STDIN  67. for( i=0; i<9; i++ ){print(i);
STDIN  69.   mL=matrix(rhoL(i),5,5)*matrix(m1L,5,size(m1L));
STDIN  71.   mL=reduce(mL,m2L);
STDIN  73.   m2L=m2L,mL;
STDIN  75.   m2L=groebner(m2L);
STDIN  77.   print(size(m2L));
STDIN  79. }
0
70
1
70
2
70
3
70
4
70
5
70
6
70
7
70
8
70
STDIN  80> 
STDIN  81. IL=tauL*matrix(m2L,5,size(m2L)); IL=reduce(IL,I); groebner(IL);
_[1]=0
STDIN  82> 
STDIN  83. module m3L=m2L;
STDIN  84> for( i=0; i<9; i++ ){print(i);
STDIN  86.   mL=matrix(rhoL(i),5,5)*matrix(m2L,5,size(m2L));
STDIN  88.   mL=reduce(mL,m3L);
STDIN  90.   m3L=m3L,mL;
STDIN  92.   m3L=groebner(m3L);
STDIN  94.   print(size(m3L));
STDIN  96. }
0
70
1
70
2
70
3
70
4
70
5
70
6
70
7
70
8
70
STDIN  97> 
STDIN  98. reduce(m3L,m2L);
_[1]=0
_[2]=0
_[3]=0
_[4]=0
_[5]=0
_[6]=0
_[7]=0
_[8]=0
_[9]=0
_[10]=0
_[11]=0
_[12]=0
_[13]=0
_[14]=0
_[15]=0
_[16]=0
_[17]=0
_[18]=0
_[19]=0
_[20]=0
_[21]=0
_[22]=0
_[23]=0
_[24]=0
_[25]=0
_[26]=0
_[27]=0
_[28]=0
_[29]=0
_[30]=0
_[31]=0
_[32]=0
_[33]=0
_[34]=0
_[35]=0
_[36]=0
_[37]=0
_[38]=0
_[39]=0
_[40]=0
_[41]=0
_[42]=0
_[43]=0
_[44]=0
_[45]=0
_[46]=0
_[47]=0
_[48]=0
_[49]=0
_[50]=0
_[51]=0
_[52]=0
_[53]=0
_[54]=0
_[55]=0
_[56]=0
_[57]=0
_[58]=0
_[59]=0
_[60]=0
_[61]=0
_[62]=0
_[63]=0
_[64]=0
_[65]=0
_[66]=0
_[67]=0
_[68]=0
_[69]=0
_[70]=0
STDIN  99> IL=tauL*matrix(m2L,5,size(m2L)); IL=reduce(IL,I); groebner(IL);
_[1]=0
STDIN 100> 
STDIN 101. ideal I1;
// ** redefining I1 **
STDIN 102> m=matrix(rho(2),315,315)*matrix(J40,315,size(J40));
STDIN 103> I1=tau*matrix(m,315,size(m)); I1=reduce(I1,I);
STDIN 104> I=I,I1; I=std(I);
STDIN 105> print(size(I));
13
STDIN 106> I;
I[1]=2u2+2v
I[2]=2a3+4
I[3]=2uva+4va2+2v2+2u+2a
I[4]=2v3+4ua2+2a3+4uv+4va+4
I[5]=2uv2+4ua+2a2+2v
I[6]=a4+2a
I[7]=v2a2+ua2+a3+4uv+2va
I[8]=uva2+5va3+4v2a+4ua+a2
I[9]=u2a2+va2
I[10]=uv2a+3u3+3v3+5ua2+3uv+va+1
I[11]=u3a+3v3a+5uva+2va2+4v2+4u+a
I[12]=v5a+5u5+5u2v3+3v4+3u2va+uv2+u2+2a2+3v
I[13]=u6+3v6+5u2v2+3
STDIN 107> 
STDIN 108. module m1=J40;
STDIN 109> for( i=1; i<=size(I); i++){print(i);
STDIN 111.   m=module(I[i]*Z); m=std(m); m1=reduce(m1,m); print(size(m1));
STDIN 113.   m1=m,m1; m1=groebner(m1); print(size(m1));
STDIN 115. }
1
24
343
2
343
654
3
654
//used time: 1.45 sec
1914
4
1914
//used time: 1.55 sec
1914
5
1671
//used time: 1.42 sec
1914
6
1914
//used time: 2.26 sec
2180
7
2180
//used time: 3.06 sec
2208
8
2208
//used time: 6.83 sec
2789
9
2541
//used time: 5.38 sec
2789
10
2789
//used time: 15.23 sec
3905
11
3663
//used time: 14.16 sec
3905
12
3905
//used time: 14.82 sec
3905
13
3905
//used time: 14.57 sec
3905
STDIN 116> 
STDIN 117. module mm;
STDIN 118> module m2=m1; int j;
// ** redefining j **
STDIN 119> for( i=0; i<31; i++ ){print("--------");print(i);
STDIN 121.   m=matrix(rho(i),315,315)*matrix(J40,315,size(J40));
STDIN 123.   mm=t*m; m=m,mm; mm=t*m; m=m,mm;
STDIN 125.   m=reduce(m,m2); m2=m2,m; print(size(m));
STDIN 127.   if( size(m)>0 ){
STDIN 129.     I1=tau*matrix(m,315,size(m)); I1=reduce(I1,I);
STDIN 131.     I1=groebner(I1); print(I1);
STDIN 133.     if( size(I1)>1 | I1[1]!=0 ){
STDIN 135.       I=reduce(I,I1); I=I,I1; I=std(I); print("I=");print(I);print("----");
STDIN 137.       for( j=1; j<=size(I1); j++ ){m=module(I1[j]*Z); m2=m2,m;}
STDIN 139.     }
STDIN 141.   }
STDIN 143.   m2=groebner(m2);
STDIN 145.   print(size(m2));
STDIN 147. }
--------
0
48
0
//used time: 26.94 sec
3866
--------
1
//used time: 1.18 sec
32
0
//used time: 16.16 sec
3831
--------
2
60
0
//used time: 14.80 sec
3821
--------
3
0
//used time: 14.48 sec
3821
--------
4
24
0
//used time: 268.97 sec
3931
--------
5
//used time: 2.44 sec
89
0
//used time: 1484.50 sec
4368
--------
6
0
//used time: 1195.05 sec
4368
--------
7
//used time: 2.58 sec
24
0
//used time: 2218.87 sec
4438
--------
8
//used time: 3.92 sec
24
0
//used time: 1552.77 sec
3912
--------
9
0
//used time: 1164.90 sec
3912
--------
10
0
//used time: 954.70 sec
3912
--------
11
//used time: 5.00 sec
24
0
//used time: 831.56 sec
3669
--------
12
//used time: 6.30 sec
24
0
//used time: 811.50 sec
3815
--------
13
//used time: 8.98 sec
0
//used time: 630.66 sec
3815
--------
14
//used time: 79.10 sec
24
0
//used time: 699.40 sec
3843
--------
15
//used time: 181.34 sec
24
0
//used time: 665.46 sec
3406
--------
16
//used time: 81.01 sec
0
//used time: 452.46 sec
3406
--------
17
//used time: 91.22 sec
0
//used time: 356.93 sec
3406
--------
18
//used time: 84.27 sec
0
//used time: 350.00 sec
3406
--------
19
//used time: 125.92 sec
24
0
//used time: 459.12 sec
2774
--------
20
//used time: 206.41 sec
24
0
//used time: 257.05 sec
2674
--------
21
//used time: 42.45 sec
0
//used time: 151.70 sec
2674
--------
22
//used time: 47.42 sec
24
0
//used time: 137.53 sec
2254
--------
23
//used time: 143.24 sec
24
0
//used time: 78.39 sec
1688
--------
24
//used time: 63.51 sec
0
//used time: 27.47 sec
1688
--------
25
//used time: 19.82 sec
0
//used time: 20.75 sec
1688
--------
26
//used time: 23.10 sec
24
0
//used time: 19.12 sec
1608
--------
27
//used time: 39.44 sec
24
0
//used time: 15.29 sec
1578
--------
28
//used time: 12.05 sec
0
//used time: 13.05 sec
1578
--------
29
//used time: 16.05 sec
24
0
//used time: 10.99 sec
1512
--------
30
//used time: 4.94 sec
23
0
//used time: 7.79 sec
1376
STDIN 148> 
STDIN 149. module m3=m2; int j;
// ** redefining j **
STDIN 150> for( i=0; i<31; i++ ){print("--------");print(i);
STDIN 152.   m=matrix(rho(i),315,315)*matrix(m2,315,size(m2));
STDIN 154.   mm=t*m; m=m,mm; mm=t*m; m=m,mm;
STDIN 156.   m=reduce(m,m3); m3=m3,m; print(size(m));
STDIN 158.   if( size(m)>0 ){
STDIN 160.     I1=tau*matrix(m,315,size(m)); I1=reduce(I1,I);
STDIN 162.     I1=groebner(I1); print(I1);
STDIN 164.     if( size(I1)>1 | I1[1]!=0 ){
STDIN 166.       I=reduce(I,I1); I=I,I1; I=std(I); print("I=");print(I);print("----");
STDIN 168.       for( j=1; j<=size(I1); j++ ){m=module(I1[j]*Z); m3=m3,m;}
STDIN 170.     }
STDIN 172.   }
STDIN 174.   m3=groebner(m3);
STDIN 176.   print(size(m3));
STDIN 178. }
--------
0
//used time: 167.36 sec
0
//used time: 6.81 sec
1376
--------
1
//used time: 245.30 sec
0
//used time: 5.81 sec
1376
--------
2
//used time: 274.52 sec
0
//used time: 5.81 sec
1376
--------
3
//used time: 252.41 sec
0
//used time: 5.82 sec
1376
--------
4
//used time: 0.61 sec
//used time: 0.95 sec
//used time: 0.95 sec
//used time: 255.64 sec
1330
0
//used time: 7.25 sec
1414
--------
5
//used time: 6.82 sec
//used time: 6.97 sec
//used time: 2.05 sec
//used time: 6.76 sec
//used time: 439.37 sec
605
0
//used time: 8.45 sec
1447
--------
6
//used time: 0.54 sec
//used time: 260.18 sec
0
//used time: 6.05 sec
1447
--------
7
//used time: 6.47 sec
//used time: 6.64 sec
//used time: 1.98 sec
//used time: 6.46 sec
//used time: 437.42 sec
591
0
//used time: 5.85 sec
1445
--------
8
//used time: 6.71 sec
//used time: 6.34 sec
//used time: 1.86 sec
//used time: 6.08 sec
//used time: 426.62 sec
0
//used time: 4.94 sec
1445
--------
9
//used time: 274.43 sec
0
//used time: 5.02 sec
1445
--------
10
//used time: 0.61 sec
//used time: 289.79 sec
0
//used time: 4.84 sec
1445
--------
11
//used time: 4.48 sec
//used time: 5.56 sec
//used time: 1.60 sec
//used time: 5.42 sec
//used time: 398.08 sec
0
//used time: 4.84 sec
1445
--------
12
//used time: 7.52 sec
//used time: 7.13 sec
//used time: 2.11 sec
//used time: 6.85 sec
//used time: 457.28 sec
0
//used time: 4.84 sec
1445
--------
13
//used time: 0.51 sec
//used time: 256.19 sec
0
//used time: 5.07 sec
1445
--------
14
//used time: 7.99 sec
//used time: 7.25 sec
//used time: 2.20 sec
//used time: 7.09 sec
//used time: 481.70 sec
0
//used time: 4.84 sec
1445
--------
15
//used time: 2.57 sec
//used time: 4.11 sec
//used time: 0.99 sec
//used time: 4.08 sec
//used time: 356.55 sec
0
//used time: 4.90 sec
1445
--------
16
//used time: 170.27 sec
0
//used time: 4.90 sec
1445
--------
17
//used time: 238.79 sec
0
//used time: 4.86 sec
1445
--------
18
//used time: 221.38 sec
0
//used time: 4.71 sec
1445
--------
19
//used time: 0.82 sec
//used time: 1.89 sec
//used time: 1.88 sec
//used time: 271.81 sec
0
//used time: 4.72 sec
1445
--------
20
//used time: 3.28 sec
//used time: 4.62 sec
//used time: 1.29 sec
//used time: 4.43 sec
//used time: 422.70 sec
0
//used time: 4.76 sec
1445
--------
21
//used time: 248.14 sec
0
//used time: 4.72 sec
1445
--------
22
//used time: 3.16 sec
//used time: 4.39 sec
//used time: 1.24 sec
//used time: 4.24 sec
//used time: 409.57 sec
0
//used time: 4.74 sec
1445
--------
23
//used time: 2.26 sec
//used time: 4.02 sec
//used time: 1.06 sec
//used time: 3.86 sec
//used time: 388.26 sec
0
//used time: 4.74 sec
1445
--------
24
//used time: 248.48 sec
0
//used time: 4.70 sec
1445
--------
25
//used time: 292.54 sec
0
//used time: 4.71 sec
1445
--------
26
//used time: 2.54 sec
//used time: 3.81 sec
//used time: 1.04 sec
//used time: 3.69 sec
//used time: 369.44 sec
0
//used time: 4.72 sec
1445
--------
27
//used time: 2.77 sec
//used time: 4.68 sec
//used time: 1.26 sec
//used time: 9.04 sec
//used time: 428.04 sec
0
//used time: 4.72 sec
1445
--------
28
//used time: 245.52 sec
0
//used time: 4.71 sec
1445
--------
29
//used time: 2.97 sec
//used time: 4.66 sec
//used time: 1.29 sec
//used time: 4.56 sec
//used time: 440.50 sec
0
//used time: 4.74 sec
1445
--------
30
//used time: 0.66 sec
//used time: 0.60 sec
//used time: 123.65 sec
0
//used time: 4.69 sec
1445
STDIN 179> 
STDIN 180. module m4=m3; int j;
// ** redefining j **
STDIN 181> for( i=0; i<31; i++ ){print("--------");print(i);
STDIN 183.   m=matrix(rho(i),315,315)*matrix(m3,315,size(m3));
STDIN 185.   mm=t*m; m=m,mm; mm=t*m; m=m,mm;
STDIN 187.   m=reduce(m,m4); m4=m4,m; print(size(m));
STDIN 189.   if( size(m)>0 ){
STDIN 191.     I1=tau*matrix(m,315,size(m)); I1=reduce(I1,I);
STDIN 193.     I1=groebner(I1); print(I1);
STDIN 195.     if( size(I1)>1 | I1[1]!=0 ){
STDIN 197.       I=reduce(I,I1); I=I,I1; I=std(I); print("I=");print(I);print("----");
STDIN 199.       for( j=1; j<=size(I1); j++ ){m=module(I1[j]*Z); m4=m4,m;}
STDIN 201.     }
STDIN 203.   }
STDIN 205.   m4=groebner(m4);
STDIN 207.   print(size(m4));
STDIN 209. }
--------
0
//used time: 110.95 sec
0
//used time: 5.02 sec
1445
--------
1
//used time: 186.38 sec
0
//used time: 4.70 sec
1445
--------
2
//used time: 224.43 sec
0
//used time: 4.72 sec
1445
--------
3
//used time: 213.52 sec
0
//used time: 4.74 sec
1445
--------
4
//used time: 0.74 sec
//used time: 0.77 sec
//used time: 213.45 sec
0
//used time: 4.70 sec
1445
--------
5
//used time: 5.21 sec
//used time: 6.33 sec
//used time: 1.84 sec
//used time: 6.22 sec
//used time: 424.60 sec
0
//used time: 4.84 sec
1445
--------
6
//used time: 234.47 sec
0
//used time: 5.22 sec
1445
--------
7
//used time: 4.93 sec
//used time: 6.09 sec
//used time: 1.77 sec
//used time: 5.93 sec
//used time: 426.55 sec
0
//used time: 4.85 sec
1445
--------
8
//used time: 5.08 sec
//used time: 5.82 sec
//used time: 1.69 sec
//used time: 5.70 sec
//used time: 418.93 sec
0
//used time: 4.89 sec
1445
--------
9
//used time: 250.77 sec
0
//used time: 5.02 sec
1445
--------
10
//used time: 283.00 sec
0
//used time: 4.80 sec
1445
--------
11
//used time: 3.37 sec
//used time: 5.04 sec
//used time: 1.38 sec
//used time: 4.92 sec
//used time: 385.36 sec
0
//used time: 4.81 sec
1445
--------
12
//used time: 5.69 sec
//used time: 6.55 sec
//used time: 1.88 sec
//used time: 6.30 sec
//used time: 443.64 sec
0
//used time: 4.83 sec
1445
--------
13
//used time: 250.57 sec
0
//used time: 5.27 sec
1445
--------
14
//used time: 6.35 sec
//used time: 6.88 sec
//used time: 2.04 sec
//used time: 6.79 sec
//used time: 486.46 sec
0
//used time: 4.84 sec
1445
--------
15
//used time: 2.03 sec
//used time: 3.79 sec
//used time: 0.88 sec
//used time: 3.72 sec
//used time: 352.89 sec
0
//used time: 4.92 sec
1445
--------
16
//used time: 165.14 sec
0
//used time: 4.90 sec
1445
--------
17
//used time: 240.88 sec
0
//used time: 4.82 sec
1445
--------
18
//used time: 226.11 sec
0
//used time: 4.71 sec
1445
--------
19
//used time: 0.77 sec
//used time: 1.79 sec
//used time: 1.78 sec
//used time: 275.42 sec
0
//used time: 4.69 sec
1445
--------
20
//used time: 3.19 sec
//used time: 4.46 sec
//used time: 1.24 sec
//used time: 4.26 sec
//used time: 422.55 sec
0
//used time: 4.75 sec
1445
--------
21
//used time: 252.50 sec
0
//used time: 4.70 sec
1445
--------
22
//used time: 3.00 sec
//used time: 4.22 sec
//used time: 1.18 sec
//used time: 4.07 sec
//used time: 412.76 sec
0
//used time: 4.73 sec
1445
--------
23
//used time: 2.19 sec
//used time: 3.88 sec
//used time: 1.01 sec
//used time: 3.68 sec
//used time: 391.42 sec
0
//used time: 4.74 sec
1445
--------
24
//used time: 244.78 sec
0
//used time: 4.70 sec
1445
--------
25
//used time: 294.42 sec
0
//used time: 4.71 sec
1445
--------
26
//used time: 2.45 sec
//used time: 3.69 sec
//used time: 1.00 sec
//used time: 3.54 sec
//used time: 375.29 sec
0
//used time: 4.74 sec
1445
--------
27
//used time: 2.71 sec
//used time: 4.53 sec
//used time: 1.21 sec
//used time: 4.31 sec
//used time: 427.94 sec
0
//used time: 4.73 sec
1445
--------
28
//used time: 247.43 sec
0
//used time: 4.72 sec
1445
--------
29
//used time: 2.85 sec
//used time: 4.52 sec
//used time: 1.24 sec
//used time: 4.36 sec
//used time: 448.11 sec
0
//used time: 4.74 sec
1445
--------
30
//used time: 0.63 sec
//used time: 0.56 sec
//used time: 123.86 sec
0
//used time: 4.71 sec
1445
STDIN 210> 
STDIN 211. m=reduce(m4,m3);
STDIN 212> groebner(m);
_[1]=0
STDIN 213> 
STDIN 214. I;
I[1]=2u2+2v
I[2]=2a3+4
I[3]=2uva+4va2+2v2+2u+2a
I[4]=2v3+4ua2+2a3+4uv+4va+4
I[5]=2uv2+4ua+2a2+2v
I[6]=a4+2a
I[7]=v2a2+ua2+a3+4uv+2va
I[8]=uva2+5va3+4v2a+4ua+a2
I[9]=u2a2+va2
I[10]=uv2a+3u3+3v3+5ua2+3uv+va+1
I[11]=u3a+3v3a+5uva+2va2+4v2+4u+a
I[12]=v5a+5u5+5u2v3+3v4+3u2va+uv2+u2+2a2+3v
I[13]=u6+3v6+5u2v2+3
STDIN 215> 
STDIN 216. // the gb for Q
STDIN 217. poly g(1)= a3+8;
STDIN 218> poly g(2)=2a3+1;
STDIN 219> poly g(3)=3a3+8;
STDIN 220> poly f(1)=g(1)*g(2)*g(3);
STDIN 221> poly f(2)=g(1)*g(3)*(u-a);
STDIN 222> poly f(3)=g(3)*(6u3-3a2u+a3+2);
STDIN 223> poly f(4)=336u4-792u3a+180u2a5+1272u2a2+846ua3+3264u-114a7-1405a4-3152a;
STDIN 224> poly f(5)=288v+336u3a2+216u2a3+2016u2-432ua4-2112ua-6a8+53a5+472a2;
STDIN 225> ideal Id; Id=f(1),f(2),f(3),f(4),f(5); Id=std(Id); Id;
Id[1]=2a3+4
Id[2]=a4+2a
STDIN 226> reduce(Id,I);
_[1]=0
_[2]=0
STDIN 227> reduce(I,Id);
_[1]=2u2+2v
_[2]=0
_[3]=2uva+4va2+2v2+2u+2a
_[4]=2v3+4ua2+4uv+4va
_[5]=2uv2+4ua+2a2+2v
_[6]=0
_[7]=v2a2+ua2+a3+4uv+2va
_[8]=uva2+5va3+4v2a+4ua+a2
_[9]=u2a2+va2
_[10]=uv2a+3u3+3v3+5ua2+3uv+va+1
_[11]=u3a+3v3a+5uva+2va2+4v2+4u+a
_[12]=v5a+5u5+5u2v3+3v4+3u2va+uv2+u2+2a2+3v
_[13]=u6+3v6+5u2v2+3
> Auf Wiedersehen.
