Changeset 130797 in git

Timestamp:

Nov 17, 2014, 3:27:45 PM (9 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', '00e2e9c41af3fde1273eb3633f4c0c7c3db2579d')

Children:

2ded874d151d5045e5aec886534e1d3c44433a76

Parents:

0bd4b29132baebe2504d6f0ade75a81dd2dda8b5

Message:

fix: tr #667 (minAssChar)

Files:

• Singular/LIB/primdec.lib (modified) (5 diffs)
• Tst/Short/bug_tr667.res.gz.uu (added)
• Tst/Short/bug_tr667.stat (added)
• Tst/Short/bug_tr667.tst (added)
• Tst/Short/ok_s.lst (modified) (1 diff)

Singular/LIB/primdec.lib

@@ -524 +524 @@
     return(0);
   }
-  for (i=1;i<=size(act)-1;i++)
+  for (i=1;i<size(act);i++)
   {
     for(j=i+1;j<=size(act);j++)
@@ -1436 +1436 @@
   for(j=2;j<=size(F);j++)
   {
-    for(k=1;k<=j-1;k++)
+    for(k=1;k<j;k++)
     {
       ti=F[k];
@@ -2016 +2016 @@
         if(ndim>odim)
         {
-           for(k=count;k<=j-1;k++)
+           for(k=count;k<j;k++)
            {
               pos[k]=1;
@@ -4424 +4424 @@
     PHI[i]=ideal(m[i,1..ncols(m)]);
     I=0;
-    for(j=size(PHI[i]);j>0;j=j-1)
+    for(j=ncols(PHI[i]);j>0;j--)
     {
       I=I,ini_mod(PHI[i][j]);
@@ -4849 +4849 @@
             m=minAssPrimes(SP,1);
           }
-          for(j=size(m);j>=1;j=j-1)
+          for(j=size(m);j>=1;j--)
             {
               m[j]=std(m[j]);

Tst/Short/ok_s.lst

@@ -24 +24 @@
 bug_tr665
 bug_tr666
+bug_tr667
 bug_tr668
 bug_genus_etc