Changeset 56a6cc in git

Timestamp:

Jul 21, 2005, 2:48:30 PM (18 years ago)

Author:

Michael Brickenstein <bricken@…>

Branches:

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

Children:

777e90b4efb824cd571a9ff5b6821f7a34daf31e

Parents:

54e883b94f59e2e4f4eae57d4ab1d445925534ad

Message:

*bricken: work on nc


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

File:

• kernel/tgb.cc (modified) (3 diffs)

kernel/tgb.cc

@@ -5 +5 @@
 *  Computer Algebra System SINGULAR     *
 ****************************************/
-/* $Id: tgb.cc,v 1.36 2005-07-21 11:22:45 bricken Exp $ */
+/* $Id: tgb.cc,v 1.37 2005-07-21 12:48:30 bricken Exp $ */
 /*
 * ABSTRACT: slimgb and F4 implementation
@@ -2635 +2635 @@
         int i;
         int quality_a=quality_of_pos_in_strat_S(erg.reduce_by,c);
+        if (c->nc)
+          quality_a=quality_of_pos_in_strat_S_mult_high(erg.reduce_by, los[erg.to_reduce_u].p, c);
         int best=erg.to_reduce_u+1;
         int qc;
@@ -3162 +3164 @@
     red_len=pLength(red);
   }
-  if (erg.to_reduce_u-erg.to_reduce_l>5){
+  if ((c->nc)||(erg.to_reduce_u-erg.to_reduce_l>5)){
     work_on_copy=TRUE;
     // poly m=pOne();