Changeset 0ec631 in git for kernel/ideals.cc

Timestamp:

Jan 6, 2009, 4:49:15 PM (14 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'spielwiese', '8d54773d6c9e2f1d2593a28bc68b7eeab54ed529')

Children:

de95ec6fb0ed8eeb4e8a94afd54d06b7f126e59a

Parents:

7f1e81f502d6c58582e3220a7509892397167bfe

Message:

*hannes: OrdSgn


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

File:

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

kernel/ideals.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: ideals.cc,v 1.63 2009-01-06 13:59:35 Singular Exp $ */
+/* $Id: ideals.cc,v 1.64 2009-01-06 15:49:14 Singular Exp $ */
 /*
 * ABSTRACT - all basic methods to manipulate ideals
@@ -687 +687 @@
 
   homog = idHomModule(h1,currQuotient,&wth);
-  if (rHasGlobalOrdering() && (!homog))
-  {
-    WarnS("minbase applies only to the local or homogeneous case");
-    e=idCopy(h1);
-    return e;
-  }
-  if ((currRing->OrdSgn == 1) && (homog))
-  {
-    ideal re=kMin_std(h1,currQuotient,(tHomog)homog,&wth,h2,NULL,0,3);
-    idDelete(&re);
-    return h2;
+  if (rHasGlobalOrdering_currRing)
+  {
+    if(!homog)
+    {
+      WarnS("minbase applies only to the local or homogeneous case");
+      e=idCopy(h1);
+      return e;
+    }
+    else
+    {
+      ideal re=kMin_std(h1,currQuotient,(tHomog)homog,&wth,h2,NULL,0,3);
+      idDelete(&re);
+      return h2;
+    }
   }
   e=idInit(1,h1->rank);