Changeset 3c0498 in git for Singular/ipshell.cc
- Timestamp:
- Mar 21, 2012, 8:29:49 PM (12 years ago)
- Branches:
- (u'spielwiese', '5b153614cbc72bfa198d75b1e9e33dab2645d9fe')
- Children:
- 1f49983e2c0b18b90d6918660ec7a49d584e535e8c8dba7f7269572699622a97ae531f403418954a
- Parents:
- 2d2c99cd52253e2a0a953a1aa32a55546c4a67cc
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/ipshell.cc
r2d2c99c r3c0498 1654 1654 // 3: qideal 1655 1655 L->m[3].rtyp=IDEAL_CMD; 1656 if ( rMinpolyIsNULL(R))1656 if (nCoeff_is_transExt(R->cf)) 1657 1657 L->m[3].data=(void *)idInit(1,1); 1658 1658 else 1659 1659 { 1660 const ring RR = R->cf->extRing; 1661 1662 L->m[3].data=(void *) idCopy(RR->minideal, RR); 1660 ideal q=idInit(IDELEMS(r->minideal)); 1661 q->m[0]=p_Init(R); 1662 pSetCoeff0(q->m[0],(number)(r->minideal->m[0])); 1663 L->m[3].data=(void *)q; 1663 1664 // I->m[0] = pNSet(R->minpoly); 1664 1665 } … … 2078 2079 // rParameter(R)[i]=(char *)omAlloc(10); 2079 2080 // sprintf(rParameter(R)[i],"@@(%d)",i+1); 2080 2081 2081 omFree(R->names[j]); 2082 2082 R->names[j]=(char *)omAlloc(10);
Note: See TracChangeset
for help on using the changeset viewer.