Changeset 08db0a in git
- Timestamp:
- Feb 17, 2005, 10:49:22 AM (18 years ago)
- Branches:
- (u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'a657104b677b4c461d018cbf3204d72d34ad66a9')
- Children:
- dee5f73edaad83fffbcbd97d0a093cf6ab348c0f
- Parents:
- b130fbdd904f0fcd5cd03e438f6daac7d8dc5125
- Location:
- Singular
- Files:
-
- 4 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/iparith.cc
rb130fb r08db0a 2 2 * Computer Algebra System SINGULAR * 3 3 ****************************************/ 4 /* $Id: iparith.cc,v 1.3 39 2005-02-11 20:18:34 levandovExp $ */4 /* $Id: iparith.cc,v 1.340 2005-02-17 09:49:18 Singular Exp $ */ 5 5 6 6 /* … … 2940 2940 int dummy; 2941 2941 poly p=(poly)v->Data(); 2942 if (p!=NULL) res->data = (char *)pLDeg(p,&dummy );2942 if (p!=NULL) res->data = (char *)pLDeg(p,&dummy,currRing); 2943 2943 else res->data=(char *)-1; 2944 2944 return FALSE; … … 2951 2951 int i; 2952 2952 for(i=IDELEMS(I);i>=0;i--) 2953 if (I->m[i]!=NULL) d=max(d,pLDeg(I->m[i],&dummy ));2953 if (I->m[i]!=NULL) d=max(d,pLDeg(I->m[i],&dummy,currRing)); 2954 2954 res->data = (char *)d; 2955 2955 return FALSE; … … 3143 3143 { 3144 3144 // now po!=NULL, p!=NULL 3145 int d=(pFDeg(po )-(*w)[pGetComp(po)-1] - pFDeg(p)+(*w)[i-1]);3145 int d=(pFDeg(po,currRing)-(*w)[pGetComp(po)-1] - pFDeg(p,currRing)+(*w)[i-1]); 3146 3146 if (d==0) 3147 3147 d=pLmCmp(po,p); … … 3430 3430 { 3431 3431 poly p=(poly)v->Data(); 3432 res->data=(char *)( p==NULL ? -1 : pFDeg(p ) );3432 res->data=(char *)( p==NULL ? -1 : pFDeg(p,currRing) ); 3433 3433 return FALSE; 3434 3434 } -
Singular/ipshell.cc
rb130fb r08db0a 2 2 * Computer Algebra System SINGULAR * 3 3 ****************************************/ 4 /* $Id: ipshell.cc,v 1.9 6 2005-02-03 17:52:26Singular Exp $ */4 /* $Id: ipshell.cc,v 1.97 2005-02-17 09:49:20 Singular Exp $ */ 5 5 /* 6 6 * ABSTRACT: … … 3479 3479 3480 3480 int ldummy; 3481 int deg= pLDeg( gls, &ldummy );3481 int deg= pLDeg( gls, &ldummy, currRing ); 3482 3482 // int deg= pDeg( gls ); 3483 3483 int len= pLength( gls ); -
Singular/janet.cc
rb130fb r08db0a 38 38 //#define pow_(x) pDeg((x)) 39 39 pFDegProc jDeg; 40 #define pow_(x) jDeg((x) )40 #define pow_(x) jDeg((x),currRing) 41 41 42 42 void Debug() -
Singular/tgb.cc
rb130fb r08db0a 634 634 int pq=pQuality(h,c,len); 635 635 i=simple_posInS(c->strat,h,pq); 636 c->strat->enterS(P,i,c->strat );636 c->strat->enterS(P,i,c->strat,-1); 637 637 638 638
Note: See TracChangeset
for help on using the changeset viewer.