Changeset 2a38d90 in git


Ignore:
Timestamp:
Aug 3, 2011, 6:46:30 PM (13 years ago)
Author:
Oleksandr Motsak <motsak@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'b52fc4b2495505785981d640dcf7eb3e456778ef')
Children:
47f9851c41b863a6cb62e84a4752eb913c8158ca
Parents:
af223b02cc71d0a13ef6b4dc8b7bc7843294331a
git-author:
Oleksandr Motsak <motsak@mathematik.uni-kl.de>2011-08-03 18:46:30+02:00
git-committer:
Mohamed Barakat <mohamed.barakat@rwth-aachen.de>2011-11-09 13:14:20+01:00
Message:
CHG: minor fixes + idPrint/idShow
Files:
5 edited

Legend:

Unmodified
Added
Removed
  • kernel/fglmhom.cc

    raf223b0 r2a38d90  
    426426}
    427427
    428 ideal
    429 fglmhomProc(leftv first, leftv second)
     428/* ideal fglmhomProc(leftv first, leftv second) // TODO: Move to Singular/
    430429{
    431430    idhdl dest= currRingHdl;
     
    441440
    442441    return( result );
    443 }
     442} */
    444443
    445444#endif
  • kernel/ideals.h

    raf223b0 r2a38d90  
    6363void idDBTest(ideal h1, int level, const char *f,const int l);
    6464#define idTest(A) idDBTest(A, PDEBUG, __FILE__,__LINE__)
    65 #define idPrint(id) idShow(id)
     65#define idPrint(id) idShow(id, currRing, currRing)
    6666#else
    6767#define idTest(A)  (TRUE)
     
    193193
    194194ideal id_TensorModuleMult(const int m, const ideal M, const ring rRing); // image of certain map for BGG
    195 
    196 #ifdef PDEBUG
    197 /* Shows an ideal -- only for debugging */
    198 void idShow(const ideal id, const ring lmRing, const ring tailRing, const int debugPrint = 0);
    199 #else
    200 #define idShow(id, lmRing, tailRing, debugPrint) ((void)0)
    201195#endif
    202 #endif
  • kernel/syz0.cc

    raf223b0 r2a38d90  
    519519//#define WRITE_BUCKETS
    520520#ifdef WRITE_BUCKETS
    521 PrintS("Input: \n");
    522 ideal twr=idHead(arg);
    523 idPrint(arg);
    524 idDelete(&twr);
    525 if (modcomp!=NULL) (*modcomp)->show(0,0);
     521  PrintS("Input: \n");
     522  ideal twr=idHead(arg);
     523  idPrint(arg);
     524  idDelete(&twr);
     525  if (modcomp!=NULL) (*modcomp)->show(0,0);
    526526#endif
     527   
    527528  newmodcomp = new intvec(Fl+2);
    528 //for (j=0;j<Fl;j++) pWrite(F[j]);
    529 //PrintLn();
     529  //for (j=0;j<Fl;j++) pWrite(F[j]);
     530  //PrintLn();
    530531  if (currQuotient==NULL)
    531532    pairs=(polyset)omAlloc0(Fl*sizeof(poly));
     
    865866  tHomog hom=(tHomog)idHomModule(arg,NULL,&w);
    866867  ring origR = currRing;
    867   ring syRing=NULL;
     868  ring syRing = NULL;
    868869
    869870  if ((!isMonomial) && syTestOrder(arg))
     
    889890      res=newres;
    890891    }
     892     
    891893    if ((hom==isHomog)|| (rHasGlobalOrdering(origR)))
    892894    {
    893895      if (syzIndex==0) syInitSort(res[0],&modcomp);
     896       
    894897      if ((syzIndex==0) && !rRing_has_CompLastBlock(currRing))
    895898        res[syzIndex+1] = sySchreyersSyzygiesFB(res[syzIndex],&modcomp,mW,FALSE);
    896899      else
    897900        res[syzIndex+1] = sySchreyersSyzygiesFB(res[syzIndex],&modcomp,mW);
     901       
    898902      mW = res[syzIndex];
    899903    }
     
    966970      syzIndex++;
    967971    }
    968     j = 0;
    969     while (currRing->order[j]!=0) j++;
     972//    j = 0; while (currRing->order[j]!=0) j++; // What was this for???!
    970973    rKill(syRing);
    971974  }
  • libpolys/polys/polys.h

    raf223b0 r2a38d90  
    263263
    264264#define pDivide(a,b) p_Divide(a,b,currRing)
     265#define pDivideM(a,b) p_DivideM(a,b,currRing)
    265266#define pLcm(a,b,m) p_Lcm(a,b,m,currRing)
    266267#define pDiff(a,b)  p_Diff(a,b,currRing)
  • libpolys/polys/simpleideals.h

    raf223b0 r2a38d90  
    125125int     idGetNumberOfChoise(int t, int d, int begin, int end, int * choise);
    126126
     127#ifdef PDEBUG
     128void idShow(const ideal id, const ring lmRing, const ring tailRing, const int debugPrint = 0);
    127129#endif
     130
     131
     132#endif
Note: See TracChangeset for help on using the changeset viewer.