Changeset c462b55 in git for libpolys/polys/pInline0.h
 Timestamp:
 Mar 22, 2011, 11:04:13 AM (12 years ago)
 Branches:
 (u'spielwiese', '8d54773d6c9e2f1d2593a28bc68b7eeab54ed529')
 Children:
 494884581702ad06eefdf632a5e1abb42bd90f4d
 Parents:
 ba0fc3d4dcb089fc5523e7af222a8f52d7cb44b8
 gitauthor:
 Hans Schoenemann <hannes@mathematik.unikl.de>20110322 11:04:13+01:00
 gitcommitter:
 Mohamed Barakat <mohamed.barakat@rwthaachen.de>20111109 12:04:09+01:00
 File:

 1 edited
Legend:
 Unmodified
 Added
 Removed

libpolys/polys/pInline0.h
rba0fc3 rc462b55 73 73 74 74 // returns minimal column number in the modul element a (or 0) 75 PINLINE0 long p_MinComp(poly p, ring lmRing, ring tailRing)76 {77 long result,i;78 79 if(p==NULL) return 0;80 result = p_GetComp(p,lmRing);81 if (result != 0)82 {83 loop84 {85 pIter(p);86 if(p==NULL) break;87 i = p_GetComp(p,tailRing);88 if (i<result) result = i;89 }90 }91 return result;92 }93 94 // returns maximal column number in the modul element a (or 0)95 PINLINE0 long p_MaxComp(poly p, ring lmRing, ring tailRing)96 {97 long result,i;98 99 if(p==NULL) return 0;100 result = p_GetComp(p, lmRing);101 if (result != 0)102 {103 loop104 {105 pIter(p);106 if(p==NULL) break;107 i = p_GetComp(p, tailRing);108 if (i>result) result = i;109 }110 }111 return result;112 }113 114 75 BOOLEAN p_IsConstantPoly(const poly p, const ring r) 115 76 {
Note: See TracChangeset
for help on using the changeset viewer.