Changeset 9a6bfda in git for libpolys/polys/monomials/ring.cc
 Timestamp:
 Jan 16, 2019, 5:57:49 PM (5 years ago)
 Branches:
 (u'spielwiese', '8e0ad00ce244dfd0756200662572aef8402f13d5')
 Children:
 4e6488cbb59b112719b2f54d588f978789d5160a
 Parents:
 7ddda32519be0d8983ac4300f0a8dd9c34204c6b
 File:

 1 edited
Legend:
 Unmodified
 Added
 Removed

libpolys/polys/monomials/ring.cc
r7ddda32 r9a6bfda 4468 4468 } 4469 4469 4470 BOOLEAN rHasTDeg(ring r) 4471 { 4472 int i; 4470 ring rAssure_TDeg(ring r, int &pos) 4471 { 4472 if (r>N==1) // special: dp(1)==lp(1)== no entry in typ 4473 { 4474 pos=r>VarL_LowIndex; 4475 return r; 4476 } 4473 4477 if (r>typ!=NULL) 4474 4478 { 4475 for(i =r>OrdSize1;i>=0;i)4479 for(int i=r>OrdSize1;i>=0;i) 4476 4480 { 4477 4481 if ((r>typ[i].ord_typ==ro_dp) … … 4479 4483 && (r>typ[i].data.dp.end==r>N)) 4480 4484 { 4481 return TRUE;4482 }4483 }4484 }4485 return FALSE;4486 }4487 4488 ring rAssure_TDeg(ring r, int &pos)4489 {4490 int i;4491 if (r>N==1) // special: dp(1)==lp(1)== no entry in typ4492 {4493 pos=r>VarL_LowIndex;4494 return r;4495 }4496 if (r>typ!=NULL)4497 {4498 for(i=r>OrdSize1;i>=0;i)4499 {4500 if ((r>typ[i].ord_typ==ro_dp)4501 && (r>typ[i].data.dp.start==1)4502 && (r>typ[i].data.dp.end==r>N))4503 {4504 4485 pos=r>typ[i].data.dp.place; 4505 4486 //printf("no change, pos=%d\n",pos); … … 4519 4500 } 4520 4501 4521 i =rBlocks(r);4502 int i=rBlocks(r); 4522 4503 int j; 4523 4504
Note: See TracChangeset
for help on using the changeset viewer.