Changeset 920804 in git


Ignore:
Timestamp:
Jul 6, 2010, 1:49:50 PM (14 years ago)
Author:
Hans Schoenemann <hannes@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', '4188d308699580d975efd0f6cca8dcb41c396f70')
Children:
9592631b16a2dfdc56b89012975687590f3da197
Parents:
a3d4074cfe768cb567bd39962f9bb356c8569a4d
Message:
experimental: eliminate in q-ring

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

Legend:

Unmodified
Added
Removed
  • kernel/ideals.cc

    ra3d407 r920804  
    25212521    return idCopy(h1);
    25222522  }
    2523   if (currQuotient!=NULL)
     2523  if ((currQuotient!=NULL) && rIsPluralRing(origR))
    25242524  {
    25252525    WerrorS("cannot eliminate in a qring");
     
    26352635  //for (k=0;k<IDELEMS(h1);k++) h->m[k] = prCopyR( h1->m[k], origR);
    26362636  h=idrCopyR(h1,origR,currRing);
     2637  if (origR->qideal!=NULL)
     2638  {
     2639    WarnS("eliminate in q-ring: experimental");
     2640    ideal q=idrCopyR(origR->qideal,origR,currRing);
     2641    ideal s=idSimpleAdd(h,q);
     2642    idDelete(&h);
     2643    idDelete(&q);
     2644    h=s;
     2645  }
    26372646  // compute kStd
    26382647#if 1
Note: See TracChangeset for help on using the changeset viewer.