Changeset a0abee in git for Singular/iparith.cc


Ignore:
Timestamp:
Mar 29, 2021, 11:53:18 PM (3 years ago)
Author:
Hans Schoenemann <hannes@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'b4f17ed1d25f93d46dbe29e4b499baecc2fd51bb')
Children:
9e5a6c133d12cc9750553f96ddb76b671e731293
Parents:
11b3b2c70e910e5436c4461f3bdfd2649f4aa465
git-author:
Hans Schoenemann <hannes@mathematik.uni-kl.de>2021-03-29 23:53:18+02:00
git-committer:
Hans Schoenemann <hannes@mathematik.uni-kl.de>2021-03-30 00:45:51+02:00
Message:
removed unneeded #ifdef
File:
1 edited

Legend:

Unmodified
Added
Removed
  • Singular/iparith.cc

    r11b3b2c ra0abee  
    612612  poly u_p=(poly)u->CopyD(POLY_CMD);
    613613  if ((u_p!=NULL)
    614   #ifdef HAVE_SHIFTBBA
    615614  && (!rIsLPRing(currRing))
    616   #endif
    617615  && ((v_i!=0) &&
    618616      ((long)pTotaldegree(u_p) > (signed long)currRing->bitmask / (signed long)v_i/2)))
     
    40354033  assumeStdFlag(v);
    40364034#ifdef HAVE_SHIFTBBA
    4037   if (currRing->isLPring)
     4035  if (rIsLPRing(currRing))
    40384036  {
    40394037#ifdef HAVE_RINGS
     
    42834281{
    42844282#ifdef HAVE_SHIFTBBA
    4285   if (currRing->isLPring)
     4283  if (rIsLPRing(currRing))
    42864284  {
    42874285    int deg = (int)(long)v->Data();
    4288     if (deg > currRing->N/currRing->isLPring) {
     4286    if (deg > currRing->N/currRing->isLPring)
     4287    {
    42894288      WerrorS("degree bound of Letterplace ring is to small");
    42904289      return TRUE;
     
    51725171  return FALSE;
    51735172}
     5173static BOOLEAN jjOPPOSITE(leftv res, leftv a)
     5174{
    51745175#ifdef HAVE_PLURAL
    5175 static BOOLEAN jjOPPOSITE(leftv res, leftv a)
    5176 {
    51775176  ring    r = (ring)a->Data();
    51785177  //if (rIsPluralRing(r))
     
    51875186  }
    51885187  return FALSE;
     5188#else
     5189  return TRUE;
     5190#endif
    51895191}
    51905192static BOOLEAN jjENVELOPE(leftv res, leftv a)
    51915193{
     5194#ifdef HAVE_PLURAL
    51925195  ring    r = (ring)a->Data();
    51935196  if (rIsPluralRing(r))
     
    51985201  else  res->data = rCopy(r);
    51995202  return FALSE;
     5203#else
     5204  return TRUE;
     5205#endif
    52005206}
    52015207static BOOLEAN jjTWOSTD(leftv res, leftv a)
    52025208{
     5209#ifdef HAVE_PLURAL
    52035210  ideal result;
    52045211  ideal v_id=(ideal)a->Data();
     
    52135220  setFlag(res,FLAG_TWOSTD);
    52145221  return FALSE;
    5215 }
     5222#else
     5223  return TRUE;
    52165224#endif
     5225}
     5226static BOOLEAN jjRIGHTSTD(leftv res, leftv v)
     5227{
    52175228#if defined(HAVE_SHIFTBBA) || defined(HAVE_PLURAL)// do not place above jjSTD in this file because we need to reference it
    5218 static BOOLEAN jjRIGHTSTD(leftv res, leftv v)
    5219 {
    52205229  if (rIsLPRing(currRing))
    52215230  {
     
    52725281    return jjSTD(res, v);
    52735282  }
    5274 }
     5283#else
     5284  return TRUE;
    52755285#endif
     5286}
    52765287static BOOLEAN jjTYPEOF(leftv res, leftv v)
    52775288{
     
    53625373  assumeStdFlag(v);
    53635374#ifdef HAVE_SHIFTBBA
    5364   if (currRing->isLPring)
     5375  if (rIsLPRing(currRing))
    53655376  {
    53665377#ifdef HAVE_RINGS
     
    65926603  else
    65936604  {
    6594 #ifdef HAVE_SHIFTBBA
    65956605    if (rIsLPRing(currRing))
    65966606    {
     
    65986608      return TRUE;
    65996609    }
    6600 #endif
    66016610    res->data=pSubstPar(p,-ringvar,monomexpr);
    66026611  }
     
    66416650  else
    66426651  {
    6643 #ifdef HAVE_SHIFTBBA
    66446652    if (rIsLPRing(currRing))
    66456653    {
     
    66476655      return TRUE;
    66486656    }
    6649 #endif
    66506657    res->data = idSubstPar(id,-ringvar,monomexpr);
    66516658  }
     
    98449851static BOOLEAN check_valid(const int p, const int op)
    98459852{
    9846   #ifdef HAVE_PLURAL
    98479853  if (rIsPluralRing(currRing))
    98489854  {
     
    98599865    /* else, ALLOW_PLURAL */
    98609866  }
    9861   #ifdef HAVE_SHIFTBBA
    98629867  else if (rIsLPRing(currRing))
    98639868  {
     
    98689873    }
    98699874  }
    9870   #endif
    9871   #endif
    9872 #ifdef HAVE_RINGS
    98739875  if (rField_is_Ring(currRing))
    98749876  {
     
    98919893    }
    98929894  }
    9893 #endif
    98949895  return FALSE;
    98959896}
Note: See TracChangeset for help on using the changeset viewer.