Changeset fdd95ca in git


Ignore:
Timestamp:
May 2, 2000, 6:30:44 PM (23 years ago)
Author:
Hans Schönemann <hannes@…>
Branches:
(u'spielwiese', 'f6c3dc58b0df4bd712574325fe76d0626174ad97')
Children:
f9bfec9b7263804ac776257b32087185168b1000
Parents:
a86d4c7d13239aa82c534e225bfb3616f3ff2f13
Message:
*hannes: use pNomaliuze in maEval*


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

Legend:

Unmodified
Added
Removed

  • Singular/maps.cc

    ra86d4c rfdd95ca  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: maps.cc,v 1.22 2000-02-10 16:46:54 Singular Exp $ */
     4/* $Id: maps.cc,v 1.23 2000-05-02 16:30:44 Singular Exp $ */
    55/*
    66* ABSTRACT - the mapping of polynomials to other rings
    … …  
    7474      p0=MATELEM(s,v,j)=pMult(pCopy(p0/*MATELEM(s,v,j-1)*/),
    7575                              pCopy(p/*theMap->m[v-1]*/));
     76      pNormalize(p0);
    7677    }
    7778    res=pCopy(p0/*MATELEM(s,v,pExp)*/);

  • Singular/polys.cc

    ra86d4c rfdd95ca  
    22*  Computer Algebra System SINGULAR     *
    33****************************************/
    4 /* $Id: polys.cc,v 1.53 2000-01-31 14:57:32 Singular Exp $ */
     4/* $Id: polys.cc,v 1.54 2000-05-02 16:30:43 Singular Exp $ */
    55
    66/*
    … …  
    15871587void pNormalize(poly p)
    15881588{
     1589  if (rField_has_simple_inverse()) return; /* Z/p, GF(p,n), R, long R/C */
    15891590  while (p!=NULL)
    15901591  {

  • Singular/polys.h

    ra86d4c rfdd95ca  
    44*  Computer Algebra System SINGULAR     *
    55****************************************/
    6 /* $Id: polys.h,v 1.29 2000-02-02 18:04:07 Singular Exp $ */
     6/* $Id: polys.h,v 1.30 2000-05-02 16:30:43 Singular Exp $ */
    77/*
    88* ABSTRACT - all basic methods to manipulate polynomials
    … …  
    248248void      pContent(poly p);
    249249void      pCleardenom(poly p);
     250void      pNormalize(poly p);
    250251
    251252// homogenizes p by multiplying certain powers of the varnum-th variable
    … …  
    296297void      pDeleteComp(poly * p,int k);
    297298void      pNorm(poly p);
    298 void      pNormalize(poly p);
    299299poly      pSubst(poly p, int n, poly e);
    300300poly      pJet(poly p, int m);
Note: See TracChangeset for help on using the changeset viewer.