Changeset f9d20d7 in git

Timestamp:

Nov 13, 2013, 10:42:33 AM (10 years ago)

Author:

Christian Eder

Branches:

(u'spielwiese', 'd1b01e9d51ade4b46b745d3bada5c5f3696be3a8')

Children:

2f1fda5d1caba9d94996a2cbeaaf1a3f83bbbe10

Parents:

b3e94aa7397457378c5b5253b4ba1d89eab89f32

git-author:

Christian Eder <ederc@mathematik.uni-kl.de>2013-11-13 10:42:33+01:00

git-committer:

Oleksandr Motsak <motsak@mathematik.uni-kl.de>2013-11-15 14:58:02+01:00

Message:

adds debug information on number of top s-reductions in sba

File:

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

kernel/kstd2.cc

@@ -50 +50 @@
 #define F5C       0
 #if F5C
-  #define F5CTAILRED 0
+  #define F5CTAILRED 1
 #endif
 
 #define SBA_PRODUCT_CRITERION         0
-#define SBA_PRINT_ZERO_REDUCTIONS     0
-#define SBA_PRINT_SIZE_G              0
-#define SBA_PRINT_SIZE_SYZ            0
+#define SBA_PRINT_ZERO_REDUCTIONS     1
+#define SBA_PRINT_REDUCTION_STEPS     1
+#define SBA_PRINT_SIZE_G              1
+#define SBA_PRINT_SIZE_SYZ            1
 #define SBA_PRINT_PRODUCT_CRITERION   0
+
+long sba_reduction_steps;
 /***********************************************
  * SBA stuff -- done
@@ -619 +622 @@
 #endif
     sigSafe = ksReducePolySig(h, &(strat->T[ii]), strat->S_2_R[ii], NULL, NULL, strat);
+#if SBA_PRINT_REDUCTION_STEPS
+    sba_reduction_steps++;
+#endif
     // if reduction has taken place, i.e. the reduction was sig-safe
     // otherwise start is already at the next position and the loop
@@ -1506 +1512 @@
   long size_g             = 0;
   long size_syz           = 0;
+  // global variable
+  sba_reduction_steps     = 0;
 
   ideal F = F0;
@@ -2055 +2063 @@
   printf("ZERO REDUCTIONS:   %ld\n",zeroreductions);
 #endif
+#if SBA_PRINT_REDUCTION_STEPS
+  printf("TOP S-REDUCTIONS:  %ld\n",sba_reduction_steps);
+#endif
 #if SBA_PRINT_SIZE_G
   printf("SIZE OF G:         %ld\n",size_g);
@@ -2064 +2075 @@
   printf("PRODUCT CRITERIA:  %ld\n",product_criterion);
 #endif
-  zeroreductions    = 0;
-  size_g            = 0;
-  size_syz          = 0;
-  product_criterion = 0;
+  zeroreductions      = 0;
+  size_g              = 0;
+  size_syz            = 0;
+  product_criterion   = 0;
+  sba_reduction_steps = 0;
   return (strat->Shdl);
 }