Changeset ff4e847 in git


Ignore:
Timestamp:
Aug 2, 2000, 9:06:29 PM (24 years ago)
Author:
Thomas Siebert <siebert@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'b52fc4b2495505785981d640dcf7eb3e456778ef')
Children:
00760988f8ad6cfed0c0f25ea37e4355e87a3c66
Parents:
dc089843ab44e1609c3728250cda299c475b238d
Message:
TS: correct a bug (from MS) for 0-modules in division


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

Legend:

Unmodified
Added
Removed
  • Singular/ideals.cc

    rdc0898 rff4e847  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: ideals.cc,v 1.96 2000-07-06 13:30:01 pohl Exp $ */
     4/* $Id: ideals.cc,v 1.97 2000-08-02 19:06:29 siebert Exp $ */
    55/*
    66* ABSTRACT - all basic methods to manipulate ideals
     
    16281628  poly p;
    16291629
    1630   if (idIs0(mod))
     1630  if (idIs0(submod))
    16311631  {
    16321632    if (unit!=NULL)
     
    16381638    {
    16391639      *rest=idInit(1,mod->rank);
     1640    }
     1641    return idInit(1,mod->rank);
     1642  }
     1643  if (idIs0(mod))
     1644  {
     1645    if (unit!=NULL)
     1646    {
     1647      i=IDELEMS(submod);
     1648      *unit=mpNew(i,i);
     1649      for (j=i;j>0;j--)
     1650      {
     1651        MATELEM(*unit,j,j)=pOne();
     1652      }
     1653    }
     1654    if (rest!=NULL)
     1655    {
     1656      *rest=idCopy(submod);
    16401657    }
    16411658    return idInit(1,mod->rank);
Note: See TracChangeset for help on using the changeset viewer.