Changeset 1f9a84 in git for Singular/LIB/presolve.lib
- Timestamp:
- May 5, 2011, 2:19:42 PM (13 years ago)
- Branches:
- (u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')
- Children:
- 750e704356a16e0d46bd540f5fe07a831a40cded
- Parents:
- d44974deb309558594f4d26a7d11c490304c77cf
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/LIB/presolve.lib
rd44974d r1f9a84 1090 1090 { 1091 1091 @L2=@L2+list("dp",0); 1092 if ( @L2[@ii /2] != 0)1092 if ( @L2[@ii div 2] != 0) 1093 1093 { 1094 1094 @v = @l[@ii]; 1095 1095 for ( @jj=1; @jj<=size(@v); @jj++ ) 1096 1096 { 1097 @o = @o+@L2[@ii /2 -1]+"("+string(@v[@jj])+"),";1097 @o = @o+@L2[@ii div 2 -1]+"("+string(@v[@jj])+"),"; 1098 1098 } 1099 1099 } 1100 1100 else 1101 1101 { 1102 @o = @o+@L2[@ii /2 -1]+"("+string(size(@l[@ii/2]))+"),";1102 @o = @o+@L2[@ii div 2 -1]+"("+string(size(@l[@ii div 2]))+"),"; 1103 1103 } 1104 1104 } … … 1264 1264 if ( size(m)!=0 ) 1265 1265 { 1266 l = 2*(l /2)+2;1266 l = 2*(l div 2)+2; 1267 1267 ideal a(l) = simplify(m,2); 1268 1268 intvec v(l) = compress(v); … … 1314 1314 vec = sort(L)[2]; 1315 1315 if ( n(kk) != 0 ) { vec = vec[size(vec)..1]; } 1316 blockvec[kk /2] = vec;1316 blockvec[kk div 2] = vec; 1317 1317 vec = sort(v(kk),vec)[1]; 1318 1318 varvec = varvec,vec;
Note: See TracChangeset
for help on using the changeset viewer.