Changeset b199d5 in git


Ignore:
Timestamp:
Mar 7, 2002, 5:00:58 PM (22 years ago)
Author:
Mathias Schulze <mschulze@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'b52fc4b2495505785981d640dcf7eb3e456778ef')
Children:
f92436c8e9ad3b0aadd30dcaafb8fa4eafe6c31a
Parents:
101cd892be49d477f3f2ab71d77dbfe943baa01b
Message:
*mschulze: (T,R,U)=division(M,N) => M*U=N*T+R


git-svn-id: file:///usr/local/Singular/svn/trunk@5959 2c84dea3-7e68-4137-9b89-c4e89433aadc
Location:
Singular
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • Singular/ideals.cc

    r101cd8 rb199d5  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: ideals.cc,v 1.127 2002-02-28 17:56:33 mschulze Exp $ */
     4/* $Id: ideals.cc,v 1.128 2002-03-07 16:00:58 mschulze Exp $ */
    55/*
    66* ABSTRACT - all basic methods to manipulate ideals
     
    16801680*/
    16811681
    1682 ideal   idLift (ideal mod, ideal submod,ideal * rest, BOOLEAN goodShape,
    1683                BOOLEAN isSB,BOOLEAN divide,matrix * unit)
     1682ideal idLift(ideal mod, ideal submod,ideal *rest, BOOLEAN goodShape,
     1683             BOOLEAN isSB, BOOLEAN divide, matrix *unit)
    16841684{
    16851685  int lsmod =idRankFreeModule(submod), i, j, k;
     
    18301830      {
    18311831        pShift(&(s_rest->m[j-1]),-1);
    1832         s_rest->m[j-1] = pNeg(s_rest->m[j-1]);
     1832        s_rest->m[j-1] = s_rest->m[j-1];
    18331833      }
    18341834    }
  • Singular/iparith.cc

    r101cd8 rb199d5  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: iparith.cc,v 1.278 2002-02-28 17:56:34 mschulze Exp $ */
     4/* $Id: iparith.cc,v 1.279 2002-03-07 16:00:57 mschulze Exp $ */
    55
    66/*
     
    16611661  L->Init(3);
    16621662  L->m[0].rtyp=MATRIX_CMD;   L->m[0].data=(void *)T;
    1663   L->m[1].rtyp=MATRIX_CMD;   L->m[1].data=(void *)U;
    1664   L->m[2].rtyp=u->Typ();     L->m[2].data=(void *)R;
     1663  L->m[1].rtyp=u->Typ();     L->m[1].data=(void *)R;
     1664  L->m[2].rtyp=MATRIX_CMD;   L->m[2].data=(void *)U;
    16651665  res->data=(char *)L;
    16661666  return FALSE;
     
    48584858  if(v1->Typ()==POLY_CMD||v1->Typ()==VECTOR_CMD)
    48594859  {
     4860    if(v1->Typ()==POLY_CMD)
     4861      pShift(&R->m[0],-1);
    48604862    L->m[1].data=(void *)R->m[0];
    48614863    R->m[0]=NULL;
    48624864    idDelete(&R);
    48634865  }
    4864   else if(v1->Typ()==MATRIX_CMD)
     4866  else
     4867  if(v1->Typ()==IDEAL_CMD||v1->Typ()==MATRIX_CMD)
    48654868    L->m[1].data=(void *)idModule2Matrix(R);
    4866   else if(v1->Typ()!=IDEAL_CMD&&v1->Typ()!=MODUL_CMD)
     4869  else
    48674870    L->m[1].rtyp=MODUL_CMD;
    48684871  res->data=L;
Note: See TracChangeset for help on using the changeset viewer.