Changeset 0145cb4 in git for libpolys/polys


Ignore:
Timestamp:
Mar 23, 2011, 3:33:42 PM (13 years ago)
Author:
Hans Schoenemann <hannes@…>
Branches:
(u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'b52fc4b2495505785981d640dcf7eb3e456778ef')
Children:
53ca3d94166d37edb1866aebb7bb4d2fc87ade0d
Parents:
c1a2b203c3a09a973199bdfed4fbfe7cdf3d220f
git-author:
Hans Schoenemann <hannes@mathematik.uni-kl.de>2011-03-23 15:33:42+01:00
git-committer:
Mohamed Barakat <mohamed.barakat@rwth-aachen.de>2011-11-09 12:04:12+01:00
Message:
p_IsConstantPoly ->p_polys.h
Location:
libpolys/polys
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • libpolys/polys/monomials/p_polys.h

    rc1a2b20 r0145cb4  
    188188static inline BOOLEAN p_IsConstantComp(const poly p, const ring r);
    189189static inline BOOLEAN p_IsConstant(const poly p, const ring r);
    190 static inline BOOLEAN p_IsConstantPoly(const poly p, const ring r);
     190static inline BOOLEAN p_IsConstantPoly(const poly p, const ring r)
     191{
     192  poly pp=p;
     193  while(pp!=NULL)
     194  {
     195    if (! p_LmIsConstantComp(pp, r))
     196      return FALSE;
     197    pIter(pp);
     198  }
     199  return TRUE;
     200}
     201
    191202
    192203// return TRUE if all monoms have the same component
  • libpolys/polys/pInline0.h

    rc1a2b20 r0145cb4  
    2020#include <polys/monomials/p_polys.h>
    2121#include <polys/monomials/ring.h>
    22 
    23 // returns minimal column number in the modul element a (or 0)
    24 BOOLEAN   p_IsConstantPoly(const poly p, const ring r)
    25 {
    26   poly pp=p;
    27   while(pp!=NULL)
    28   {
    29     if (! p_LmIsConstantComp(pp, r))
    30       return FALSE;
    31     pIter(pp);
    32   }
    33   return TRUE;
    34 }
    3522
    3623/***************************************************************
Note: See TracChangeset for help on using the changeset viewer.