Changeset 69658e in git for kernel/ideals.cc

Timestamp:

Feb 22, 2013, 12:29:35 AM (10 years ago)

Author:

Oleksandr Motsak <motsak@…>

Branches:

(u'spielwiese', '0d6b7fcd9813a1ca1ed4220cfa2b104b97a0a003')

Children:

2e2c67897e034b7ffa5b8a0dda72431cff944d4a

Parents:

367df95c40f03bb94a871481eb198951b3a42c85cd4f243f3aafc7080a52fa973f2d90493e4847f2

Message:

Merge pull request #295 from YueRen/warnings

Warnings

File:

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

kernel/ideals.cc

@@ -939 +939 @@
              BOOLEAN isSB, BOOLEAN divide, matrix *unit)
 {
-  int lsmod =id_RankFreeModule(submod,currRing), i, j, k;
+  int lsmod =id_RankFreeModule(submod,currRing), j, k;
   int comps_to_add=0;
   poly p;
@@ -1646 +1646 @@
 poly idMinor(matrix a, int ar, unsigned long which, ideal R)
 {
-  int     i,j,k,size;
+  int     i,j/*,k,size*/;
   unsigned long curr;
   int *rowchoise,*colchoise;
   BOOLEAN rowch,colch;
-  ideal result;
+  // ideal result;
   matrix tmp;
   poly p,q;
@@ -1659 +1659 @@
   rowchoise=(int *)omAlloc(ar*sizeof(int));
   colchoise=(int *)omAlloc(ar*sizeof(int));
-  if ((i>512) || (j>512) || (i*j >512)) size=512;
-  else size=i*j;
-  result=idInit(size,1);
+  // if ((i>512) || (j>512) || (i*j >512)) size=512;
+  // else size=i*j;
+  // result=idInit(size,1);
   tmp=mpNew(ar,ar);
-  k = 0; /* the index in result*/
+  // k = 0; /* the index in result*/
   curr = 0; /* index of current minor */
   idInitChoise(ar,1,a->rows(),&rowch,rowchoise);
@@ -1714 +1714 @@
 ideal idMinors(matrix a, int ar, ideal R)
 {
-  int     i,j,k,size;
+  int     i,j,/*k,*/size;
   int *rowchoise,*colchoise;
   BOOLEAN rowch,colch;
@@ -1730 +1730 @@
   result=idInit(size,1);
   tmp=mpNew(ar,ar);
-  k = 0; /* the index in result*/
+  // k = 0; /* the index in result*/
   idInitChoise(ar,1,a->rows(),&rowch,rowchoise);
   while (!rowch)