Changeset ad3dfe in git for Tst/Long/zeroset1.tst
- Timestamp:
- Apr 14, 2009, 12:29:45 PM (14 years ago)
- Branches:
- (u'spielwiese', '8d54773d6c9e2f1d2593a28bc68b7eeab54ed529')
- Children:
- ecc6a3952b72008ad002a2495c5703a008644507
- Parents:
- 346b725eab88cd8b630daf32c263f1068708f2c0
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Tst/Long/zeroset1.tst
r346b725 rad3dfe 20 20 21 21 tst_init(); 22 tst_ignore("CVS ID $Id: zeroset1.tst,v 1. 1 2000-12-11 16:07:31Singular Exp $");22 tst_ignore("CVS ID $Id: zeroset1.tst,v 1.2 2009-04-14 10:29:45 Singular Exp $"); 23 23 24 24 … … 32 32 map F; 33 33 34 print(" #Points = " + string(vdim(std(id))) + "; #Solutions = " + string(size( zeroset)));34 print(" #Points = " + string(vdim(std(id))) + "; #Solutions = " + string(size(theZeroset))); 35 35 print(" minpoly = " + string(minpoly)); 36 36 print(" ideal = " + string(id)); 37 37 38 38 39 for(int i = 1; i <= size( zeroset); i++) {40 F = zeroset[i];41 print(string( zeroset[i]) + " --> " + string(F(id)));39 for(int i = 1; i <= size(theZeroset); i++) { 40 F = theZeroset[i]; 41 print(string(theZeroset[i]) + " --> " + string(F(id))); 42 42 } 43 43 } … … 48 48 ideal I = x2-1,y3-1,z-2x; 49 49 50 def S = ZeroSet(I);TestzerosetLIB(S);50 def S = zeroSet(I);TestzerosetLIB(S); 51 51 setring S; 52 52 minpoly; 53 53 id; 54 zeroset;54 theZeroset; 55 55 56 56 kill R; … … 63 63 ideal I = x3-1,3y-x,z4-1; 64 64 65 def S = ZeroSet(I);TestzerosetLIB(S);65 def S = zeroSet(I);TestzerosetLIB(S); 66 66 setring S; 67 67 minpoly; 68 68 id; 69 zeroset;69 theZeroset; 70 70 71 71 kill R; … … 78 78 ideal I = x(1)^2+1,x(2)^4-1,x(3)-x(4),x(4)^2+1,x(5)-x(4); 79 79 80 def S = ZeroSet(I);TestzerosetLIB(S);80 def S = zeroSet(I);TestzerosetLIB(S); 81 81 setring S; 82 82 minpoly; 83 83 id; 84 zeroset;84 theZeroset; 85 85 86 86 kill R; … … 94 94 ideal I = x2-a,y-2x; 95 95 96 def S = ZeroSet(I);TestzerosetLIB(S);96 def S = zeroSet(I);TestzerosetLIB(S); 97 97 setring S; 98 98 minpoly; 99 99 id; 100 zeroset;100 theZeroset; 101 101 102 102 kill R; … … 110 110 ideal I = x3-1,a*y^2-x,z^2-a*y; 111 111 112 def S = ZeroSet(I);TestzerosetLIB(S);112 def S = zeroSet(I);TestzerosetLIB(S); 113 113 setring S; 114 114 minpoly; 115 115 id; 116 zeroset;116 theZeroset; 117 117 118 118 kill R; … … 126 126 ideal I = x2-2,a*y^2-2*x,z^2 - a; // 2 127 127 128 def S = ZeroSet(I);TestzerosetLIB(S);128 def S = zeroSet(I);TestzerosetLIB(S); 129 129 setring S; 130 130 minpoly; 131 131 id; 132 zeroset;132 theZeroset; 133 133 134 134 kill R; … … 142 142 ideal I = x(1)^2 - 2,x(2) -a*x(1), x(3)^2 + 1, x(4)^2 + a, a*x(5) - x(1); 143 143 144 def S = ZeroSet(I);TestzerosetLIB(S);144 def S = zeroSet(I);TestzerosetLIB(S); 145 145 setring S; 146 146 minpoly; 147 147 id; 148 zeroset;148 theZeroset; 149 149 150 150 kill S; 151 151 152 152 setring R; 153 def S = ZeroSet(I, 1);TestzerosetLIB(S);153 def S = zeroSet(I, 1);TestzerosetLIB(S); 154 154 setring S; 155 155 minpoly; 156 156 id; 157 zeroset;157 theZeroset; 158 158 159 159 kill R; … … 168 168 ideal I = s(3)*s(4),s(2)*s(4),s(1)*s(3),s(1)*s(2),s(3)^8+s(4)^8-1,s(2)^8+s(4)^8-1,s(1)^8-s(4)^8,s(4)^9-s(4),s(1)*s(4)^8-s(1); 169 169 170 def S = ZeroSet(I);TestzerosetLIB(S);170 def S = zeroSet(I);TestzerosetLIB(S); 171 171 setring S; 172 172 minpoly; 173 173 id; 174 zeroset;174 theZeroset; 175 175 176 176 kill S; 177 177 178 178 setring R; 179 def S = ZeroSet(I, 1);TestzerosetLIB(S);179 def S = zeroSet(I, 1);TestzerosetLIB(S); 180 180 setring S; 181 181 minpoly; 182 182 id; 183 zeroset;183 theZeroset; 184 184 185 185 kill S;
Note: See TracChangeset
for help on using the changeset viewer.