Changeset 64a88e in git for kernel/clapconv.cc
- Timestamp:
- Aug 13, 2009, 5:31:27 PM (15 years ago)
- Branches:
- (u'spielwiese', '2a584933abf2a2d3082034c7586d38bb6de1a30a')
- Children:
- f5da374c614ef679bad9ff3b7d6e407d7f0dc8b0
- Parents:
- 073295f83bd787c17170311fa837e22cf427905d
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
kernel/clapconv.cc
r073295f r64a88e 3 3 * Computer Algebra System SINGULAR * 4 4 ****************************************/ 5 // $Id: clapconv.cc,v 1.1 5 2009-08-13 15:17:02Singular Exp $5 // $Id: clapconv.cc,v 1.16 2009-08-13 15:31:27 Singular Exp $ 6 6 /* 7 7 * ABSTRACT: convert data between Singular and factory … … 162 162 163 163 164 CanonicalForm convSingPFactoryP( poly p, const int off, constring r )164 CanonicalForm convSingPFactoryP( poly p, const ring r ) 165 165 { 166 166 CanonicalForm result = 0; … … 206 206 { 207 207 if ( (e = p_GetExp( p, i, r)) != 0 ) 208 term *= power( Variable( i +off), e );208 term *= power( Variable( i ), e ); 209 209 } 210 210 result += term; … … 409 409 { 410 410 n_Normalize(pGetCoeff(p),r); 411 CanonicalForm term=convSingPFactoryP(((lnumber)pGetCoeff(p))->z, 0,r->algring);411 CanonicalForm term=convSingPFactoryP(((lnumber)pGetCoeff(p))->z,r->algring); 412 412 413 413 if ((((lnumber)pGetCoeff(p))->n!=NULL)
Note: See TracChangeset
for help on using the changeset viewer.