Changeset 49a766 in git for kernel/syz.cc

Timestamp:

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

Author:

Hans Schoenemann <hannes@…>

Branches:

(u'spielwiese', 'fe61d9c35bf7c61f2b6cbf1b56e25e2f08d536cc')

Children:

b004b6273a2ce481feb153c91f19444312e14289

Parents:

77f2794c9fc905c0441cd1ad06cb1cd965926cf1

Message:

syIsMinimizedFrom, syDeleteRes removed

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

File:

• kernel/syz.cc (modified) (2 diffs)

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;
-}