Changeset 192b522 in git

Timestamp:

Mar 17, 2005, 3:14:17 PM (18 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

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

Children:

af32959658524cfa503a6d6068cc8a81f5c9e184

Parents:

42d5aa6a6beb385d8854055d86c22cf5fd0d3670

Message:

*hannes: idHomModule test fails


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

File:

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

kernel/syz.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: syz.cc,v 1.7 2005-02-17 09:42:22 Singular Exp $ */
+/* $Id: syz.cc,v 1.8 2005-03-17 14:14:17 Singular Exp $ */
 
 /*
@@ -781 +781 @@
     }
   }
-  if (idHomModule(res[0],currQuotient,&w)!=isHomog)
-  {
-    Warn("betti-command: Input is not homogeneous!");
-    weights=NULL;
-  }
+  //if (idHomModule(res[0],currQuotient,&w)!=isHomog)
+  //{
+  //  Warn("betti-command: Input is not homogeneous!");
+  //  weights=NULL;
+  //}
   if (weights==NULL) weights=w;
   else delete w;
@@ -791 +791 @@
   while ((r0_len>0) && (res[0]->m[r0_len-1]==NULL)) r0_len--;
   #ifdef SHOW_W
-  PrintS("weights:");if (weights!=NULL) weights->show(); else Print("NULL"); P
-rintLn();
+  PrintS("weights:");if (weights!=NULL) weights->show(); else Print("NULL"); PrintLn();
   #endif
   int rkl=l = si_max(idRankFreeModule(res[0]),res[0]->rank);
@@ -848 +847 @@
     {
       IMATELEM((*result),(-mr)+(*weights)[j]+1,1) ++;
-      // Print("imat(%d,%d)++ -> %d\n",(-mr)+(*weights)[j]+1, 1, IMATELEM((*result),(-mr)+(*weights)[j]+1,1));
+      //Print("imat(%d,%d)++ -> %d\n",(-mr)+(*weights)[j]+1, 1, IMATELEM((*result),(-mr)+(*weights)[j]+1,1));
     }
   }
@@ -873 +872 @@
     for(j=0;j<=rows+mr;j++)
     {
-      // Print("tocancel[%d]=%d imat(%d,%d)=%d\n",j,tocancel[j],(-mr)+j+1,1,IMATELEM((*result),(-mr)+j+1,1));
+      //Print("tocancel[%d]=%d imat(%d,%d)=%d\n",j,tocancel[j],(-mr)+j+1,1,IMATELEM((*result),(-mr)+j+1,1));
       IMATELEM((*result),(-mr)+j+1,1) -= tocancel[j];
     }