1 | LIB "tst.lib"; |
---|
2 | tst_init(); |
---|
3 | option(prot); |
---|
4 | ring r; |
---|
5 | ideal i=xy+yz+xz,x3,y3,z3; |
---|
6 | list I=mres(i,0); |
---|
7 | I; |
---|
8 | kill r; |
---|
9 | ring an=32003,(w,x,y,z),(dp,C); |
---|
10 | ideal i= |
---|
11 | 1w2xy+1w2xz+1w2yz+1wxyz+1x2yz+1xy2z+1xyz2, |
---|
12 | 1w4x+1w4z+1w3yz+1w2xyz+1wx2yz+1x2y2z+1xy2z2, |
---|
13 | 1w6+1w5z+1w4xz+1w3xyz+1w2xy2z+1wx2y2z+1x2y2z2; |
---|
14 | list I=mres(i,0); |
---|
15 | I; |
---|
16 | kill an; |
---|
17 | ring an=32003,(w,x,y,z),(dp,c); |
---|
18 | ideal i= |
---|
19 | wx2+y3, |
---|
20 | xy2+z3, |
---|
21 | yz2+w3, |
---|
22 | zw2+x3, |
---|
23 | xyz+yzw+zwx+wxy; |
---|
24 | list I=mres(i,0); |
---|
25 | I; |
---|
26 | kill an; |
---|
27 | ring an=32003,(w,x,y,z),(dp,c); |
---|
28 | ideal i= |
---|
29 | wx+y2, |
---|
30 | xy+z2, |
---|
31 | yz+w2, |
---|
32 | zw+x2, |
---|
33 | xy+yz+zw+wx; |
---|
34 | list I=mres(i,0); |
---|
35 | I; |
---|
36 | kill an; |
---|
37 | ring an=32003,(x,y,z),(dp,c); |
---|
38 | ideal i= |
---|
39 | zx2+y3, |
---|
40 | xy2+z3, |
---|
41 | yz2+x3, |
---|
42 | x2y+y2z+z2x; |
---|
43 | list I=mres(i,0); |
---|
44 | I; |
---|
45 | kill an; |
---|
46 | ring cyc5 = 32003,(f,a,b,c,d,e),dp; |
---|
47 | ideal i= |
---|
48 | a+b+c+d+e, |
---|
49 | de+1cd+1bc+1ae+1ab, |
---|
50 | cde+1bcd+1ade+1abe+1abc, |
---|
51 | bcde+1acde+1abde+1abce+1abcd, |
---|
52 | abcde-f5; |
---|
53 | //std(i); |
---|
54 | list I=mres(i,0); |
---|
55 | I; |
---|
56 | kill cyc5; |
---|
57 | ring r=32003,(y,t,x,z,w),dp; |
---|
58 | ideal i=6*t^5*x^3*z^4+5*x^5*z^7+4*t^4*y*z^3*w^4, |
---|
59 | 5*t^3*x^2*y^7*z^4+5*t^6*x*y^3*z^3*w^3+4*t^5*x^5*y*w^5, |
---|
60 | 2*t^8*z^6+6*t^5*y*z^7*w+6*t^4*y^2*z^3*w^5; |
---|
61 | //i; |
---|
62 | //option(prot); |
---|
63 | //ideal j=std(i); |
---|
64 | //$ |
---|
65 | list I=mres(i,0); |
---|
66 | I; |
---|
67 | kill r; |
---|
68 | ring cyc5 =32003,(a,b,c,d,e,f),dp; |
---|
69 | ideal i= |
---|
70 | a5-b5, |
---|
71 | b5-c5, |
---|
72 | c5-d5, |
---|
73 | d5-e5, |
---|
74 | a4*b+b4*c+c4*d+d4*e+a*e4; |
---|
75 | list I=mres(i,0); |
---|
76 | I; |
---|
77 | kill cyc5; |
---|
78 | ring an=32003,(t,x,y,z,w),(dp,C); |
---|
79 | ideal i= |
---|
80 | 2t3x5y2z+t5x2yw3+2x2yw8, |
---|
81 | 3t6x2yz2+9t3y2zw5+2xy3z2w5, |
---|
82 | t3x5y2z2+tx2y3w6+2t5zw6; |
---|
83 | list I=mres(i,0); |
---|
84 | I; |
---|
85 | kill an; |
---|
86 | ring r=0,(x,y,z,t,w),dp; |
---|
87 | ideal i=6*t^5*x^3*z+5*x^5*z^4+4*t^4*y*w^4, |
---|
88 | 5*x*y^6*z^4+5*t^3*y^2*z^3*w^3+4*t^2*x^4*w^5, |
---|
89 | 2*t^4*z^3+6*t*y*z^4*w+6*y^2*w^5; |
---|
90 | list I=mres(i,0); |
---|
91 | I; |
---|
92 | kill r; |
---|
93 | ring r=32003,(x,y,z),(C,dp); |
---|
94 | ideal i=xy+yz+xz,x3,y3,z3; |
---|
95 | list I=mres(i,0); |
---|
96 | I; |
---|
97 | kill r; |
---|
98 | ring an=32003,(w,x,y,z),(C,dp); |
---|
99 | ideal i= |
---|
100 | 1w2xy+1w2xz+1w2yz+1wxyz+1x2yz+1xy2z+1xyz2, |
---|
101 | 1w4x+1w4z+1w3yz+1w2xyz+1wx2yz+1x2y2z+1xy2z2, |
---|
102 | 1w6+1w5z+1w4xz+1w3xyz+1w2xy2z+1wx2y2z+1x2y2z2; |
---|
103 | list I=mres(i,0); |
---|
104 | I; |
---|
105 | kill an; |
---|
106 | ring an=32003,(w,x,y,z),(C,dp); |
---|
107 | ideal i= |
---|
108 | wx2+y3, |
---|
109 | xy2+z3, |
---|
110 | yz2+w3, |
---|
111 | zw2+x3, |
---|
112 | xyz+yzw+zwx+wxy; |
---|
113 | list I=mres(i,0); |
---|
114 | I; |
---|
115 | kill an; |
---|
116 | ring an=32003,(w,x,y,z),(C,dp); |
---|
117 | ideal i= |
---|
118 | wx+y2, |
---|
119 | xy+z2, |
---|
120 | yz+w2, |
---|
121 | zw+x2, |
---|
122 | xy+yz+zw+wx; |
---|
123 | list I=mres(i,0); |
---|
124 | I; |
---|
125 | kill an; |
---|
126 | ring an=32003,(x,y,z),(C,dp); |
---|
127 | ideal i= |
---|
128 | zx2+y3, |
---|
129 | xy2+z3, |
---|
130 | yz2+x3, |
---|
131 | x2y+y2z+z2x; |
---|
132 | list I=mres(i,0); |
---|
133 | I; |
---|
134 | kill an; |
---|
135 | ring cyc5 = 32003,(f,a,b,c,d,e),(C,dp); |
---|
136 | ideal i= |
---|
137 | a+b+c+d+e, |
---|
138 | de+1cd+1bc+1ae+1ab, |
---|
139 | cde+1bcd+1ade+1abe+1abc, |
---|
140 | bcde+1acde+1abde+1abce+1abcd, |
---|
141 | abcde-f5; |
---|
142 | //std(i); |
---|
143 | list I=mres(i,0); |
---|
144 | I; |
---|
145 | kill cyc5; |
---|
146 | ring r=32003,(y,t,x,z,w),(C,dp); |
---|
147 | ideal i=6*t^5*x^3*z^4+5*x^5*z^7+4*t^4*y*z^3*w^4, |
---|
148 | 5*t^3*x^2*y^7*z^4+5*t^6*x*y^3*z^3*w^3+4*t^5*x^5*y*w^5, |
---|
149 | 2*t^8*z^6+6*t^5*y*z^7*w+6*t^4*y^2*z^3*w^5; |
---|
150 | //i; |
---|
151 | //option(prot); |
---|
152 | //ideal j=std(i); |
---|
153 | //$ |
---|
154 | list I=mres(i,0); |
---|
155 | I; |
---|
156 | kill r; |
---|
157 | ring cyc5 =32003,(a,b,c,d,e,f),(C,dp); |
---|
158 | ideal i= |
---|
159 | a5-b5, |
---|
160 | b5-c5, |
---|
161 | c5-d5, |
---|
162 | d5-e5, |
---|
163 | a4*b+b4*c+c4*d+d4*e+a*e4; |
---|
164 | list I=mres(i,0); |
---|
165 | I; |
---|
166 | kill cyc5; |
---|
167 | ring an=32003,(t,x,y,z,w),(C,dp); |
---|
168 | ideal i= |
---|
169 | 2t3x5y2z+t5x2yw3+2x2yw8, |
---|
170 | 3t6x2yz2+9t3y2zw5+2xy3z2w5, |
---|
171 | t3x5y2z2+tx2y3w6+2t5zw6; |
---|
172 | list I=mres(i,0); |
---|
173 | I; |
---|
174 | kill an; |
---|
175 | ring r=0,(x,y,z,t,w),(C,dp); |
---|
176 | ideal i=6*t^5*x^3*z+5*x^5*z^4+4*t^4*y*w^4, |
---|
177 | 5*x*y^6*z^4+5*t^3*y^2*z^3*w^3+4*t^2*x^4*w^5, |
---|
178 | 2*t^4*z^3+6*t*y*z^4*w+6*y^2*w^5; |
---|
179 | list I=mres(i,0); |
---|
180 | I; |
---|
181 | kill r; |
---|
182 | LIB "tst.lib";tst_status(1);$; |
---|