Changeset 0b4ec2 in git for kernel/gr_kstd2.cc

Timestamp:

Feb 23, 2009, 12:26:29 PM (14 years ago)

Author:

Hans Schönemann <hannes@…>

Branches:

(u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'f875bbaccd0831e36aaed09ff6adeb3eb45aeb94')

Children:

e5408173a819cf24009069d4443ae2c98be47c45

Parents:

05eb8c338d5239a2e038f0b776772d795b3ac14e

Message:

*hannes: use rIsRatGRing


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

File:

• kernel/gr_kstd2.cc (modified) (4 diffs)

kernel/gr_kstd2.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: gr_kstd2.cc,v 1.27 2009-02-22 11:22:08 Singular Exp $ */
+/* $Id: gr_kstd2.cc,v 1.28 2009-02-23 11:26:29 Singular Exp $ */
 /*
 *  ABSTRACT -  Kernel: noncomm. alg. of Buchberger
@@ -170 +170 @@
   if (p==NULL) return;
   poly root=p;
-  assume(currRing->real_var_start>0);
+  assume(rIsRatGRing(currRing));
   poly f=pHead(p);
   int i;
@@ -981 +981 @@
     strat->red = redGrFirst;
 #ifdef HAVE_RATGRING
-  if (currRing->real_var_start>0)
+  if (rIsRatGRing(currRing))
   {
     int ii=IDELEMS(F)-1;
@@ -1074 +1074 @@
   nc_gr_initBba(F,strat);
   initBuchMoraPos(strat);
-  if (currRing->real_var_start>0)
+  if (rIsRatGRing(currRing))
   {
     strat->posInL=posInL0; // by pCmp of lcm