Changeset 99b206 in git


Ignore:
Timestamp:
Mar 25, 2004, 5:50:04 PM (20 years ago)
Author:
Viktor Levandovskyy <levandov@…>
Branches:
(u'spielwiese', 'e7cc1ebecb61be8b9ca6c18016352af89940b21a')
Children:
5bdabc0293eabd9c0e84bfb41f75e8fc4002d70b
Parents:
39f0690f5b3c7eacde5fc6a2e6ee80c332202f8a
Message:
*levandov: idSect fixed for noncomm case


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

Legend:

Unmodified
Added
Removed
  • kernel/ideals.cc

    r39f069 r99b206  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: ideals.cc,v 1.1.1.1 2003-10-06 12:15:53 Singular Exp $ */
     4/* $Id: ideals.cc,v 1.2 2004-03-25 16:50:04 levandov Exp $ */
    55/*
    66* ABSTRACT - all basic methods to manipulate ideals
     
    11221122        temp->m[k] = pCopy(first->m[i]);
    11231123      else
    1124         temp->m[k] = prCopyR(first->m[i], orig_ring);
     1124        temp->m[k] = prCopyR(first->m[i], orig_ring);
    11251125      q = pOne();
    11261126      pSetComp(q,i+1+length);
     
    11421142        temp->m[k] = pCopy(second->m[i]);
    11431143      else
    1144         temp->m[k] = prCopyR(second->m[i], orig_ring);
     1144        temp->m[k] = prCopyR(second->m[i], orig_ring);
    11451145      if (slength==0) pShift(&(temp->m[k]),1);
    11461146      k++;
     
    11621162    {
    11631163      if(syz_ring==orig_ring)
    1164         p = pCopy(temp1->m[i]);
     1164        p = pCopy(temp1->m[i]);
    11651165      else
    1166         p = prCopyR(temp1->m[i], syz_ring);
     1166        p = prCopyR(temp1->m[i], syz_ring);
    11671167      while (p!=NULL)
    11681168      {
     
    11721172        pSetComp(p,0);
    11731173        pSetmComp(p);
    1174         result->m[j] = pAdd(result->m[j],pMult(pCopy(first->m[k]),p));
     1174        /* Warning! multiply only from the left! it's very important for Plural */
     1175        result->m[j] = pAdd(result->m[j],pMult(p,pCopy(first->m[k])));
    11751176        p = q;
    11761177      }
Note: See TracChangeset for help on using the changeset viewer.