Changeset a93f7b0 in git

Timestamp:

Feb 27, 2009, 5:56:51 PM (15 years ago)

Author:

Viktor Levandovskyy <levandov@…>

Branches:

(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'b4f17ed1d25f93d46dbe29e4b499baecc2fd51bb')

Children:

f58aa61ada5934435d94d1d486fb70912543c11a

Parents:

b172c34e900d95e16b695c1a52b2c1b2b6497936

Message:

*levandov: cosmetic changes


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

File:

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

kernel/gr_kstd2.cc

@@ -2 +2 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: gr_kstd2.cc,v 1.34 2009-02-27 16:34:45 Singular Exp $ */
+/* $Id: gr_kstd2.cc,v 1.35 2009-02-27 16:56:51 levandov Exp $ */
 /*
 *  ABSTRACT -  Kernel: noncomm. alg. of Buchberger
@@ -256 +256 @@
         }
 #endif
-        //poly hh = nc_CreateSpoly(strat->S[c_j],(*h).p, currRing);
-        Print("vor nc_rat_ReduceSpolyNew (ce:%d) ",c_e);wrp(h->p);PrintLn();
-        //if(c_e==-1)
-        //  c_p = nc_CreateSpoly(pCopy(strat->S[c_j]),pCopy((*h).p), currRing);
-        //else
-          c_p=nc_rat_ReduceSpolyNew(strat->S[c_j],pCopy((*h).p), currRing->real_var_start-1,currRing);
-        Print("nach nc_rat_ReduceSpolyNew ");wrp(c_p);PrintLn();
-        pDelete(&((*h).p));
+    //poly hh = nc_CreateSpoly(strat->S[c_j],(*h).p, currRing);
+    //        Print("vor nc_rat_ReduceSpolyNew (ce:%d) ",c_e);wrp(h->p);PrintLn();
+    //if(c_e==-1)
+    //  c_p = nc_CreateSpoly(pCopy(strat->S[c_j]),pCopy((*h).p), currRing);
+    //else
+    //          c_p=nc_rat_ReduceSpolyNew(strat->S[c_j],pCopy((*h).p), currRing->real_var_start-1,currRing);
+    //        Print("nach nc_rat_ReduceSpolyNew ");wrp(c_p);PrintLn();
+    //        pDelete(&((*h).p));
+    
+        c_p=nc_rat_ReduceSpolyNew(strat->S[c_j],(*h).p, currRing->real_var_start-1,currRing);
         (*h).p=c_p;
         if (!TEST_OPT_INTSTRATEGY)