Changeset 49a766 in git

Timestamp:

Nov 11, 2010, 3:43:50 PM (13 years ago)

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', '0604212ebb110535022efecad887940825b97c3f')

Children:

b004b6273a2ce481feb153c91f19444312e14289

Parents:

77f2794c9fc905c0441cd1ad06cb1cd965926cf1

Message:

syIsMinimizedFrom, syDeleteRes removed

git-svn-id: file:///usr/local/Singular/svn/trunk@13642 2c84dea3-7e68-4137-9b89-c4e89433aadc

Location:

kernel

Files:

• syz.cc (modified) (2 diffs)
• syz.h (modified) (1 diff)

kernel/syz.cc

@@ -26 +26 @@
 
 #include <kernel/sca.h>
-
-void syDeleteRes(resolvente * res,int length)
-{
-  for (int i=0;i<length;i++)
-  {
-    if (!idIs0((*res)[i]))
-      idDelete(&((*res)[i]));
-  }
-  omFreeSize((ADDRESS)res,length*sizeof(ideal));
-  *res = NULL;
-}
 
 static intvec * syPrepareModComp(ideal arg,intvec ** w)
@@ -1185 +1174 @@
   return result;
 }
-
-/*2
-* is looking for the minimal minimized module of a resolvente
-* i.e. returns 0 if res comes from a mres-command and 1 in the
-* case of res-commands
-*/
-int syIsMinimizedFrom(resolvente res,int length)
-{
-  poly p;
-  int i,j=length;
-
-  while ((j>0) && (res[j-1]==NULL)) j--;
-  while (j>0)
-  {
-    for (i=0;i<IDELEMS(res[j-1]);i++)
-    {
-      p = res[j-1]->m[i];
-      while (p!=NULL)
-      {
-        if (pLmIsConstantComp(p)) return j;
-        p = pNext(p);
-      }
-    }
-    j--;
-  }
-  return j;
-}

kernel/syz.h

@@ -102 +102 @@
 syStrategy syKosz(ideal arg,int * length);
 
-void syDeleteRes(resolvente * res,int length);
 void syKillComputation(syStrategy syzstr, ring r=currRing);
 intvec * syBettiOfComputation(syStrategy syzstr, BOOLEAN minim=TRUE,int * row_shift=NULL, intvec *weights=NULL);