Changeset 20a351 in git
- Timestamp:
- Feb 24, 2010, 12:14:52 PM (13 years ago)
- Branches:
- (u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', '0604212ebb110535022efecad887940825b97c3f')
- Children:
- 710469e33da8554c00e953aa1f5227161c8a1286
- Parents:
- 089b983e63f3a9d3476752f2fcebcd1b5cccd2cf
- Location:
- Singular
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/mpsr_PutPoly.cc
r089b98 r20a351 318 318 if (r->qideal != NULL) annots++; 319 319 // we sent the minpoly with the coefficient ring 320 if ( r->minpoly != NULL & r->parameter == NULL) annots++;320 if ((r->minpoly != NULL) && (r->parameter == NULL)) annots++; 321 321 322 322 return annots; -
Singular/wrapper.cc
r089b98 r20a351 52 52 { 53 53 ideal result; 54 int dpO;55 54 56 55 jList *T; … … 71 70 if (!jInitBasis(I,&T,&Q)) 72 71 { 73 dpO=(strstr(rOrdStr(currRing),"dp")!=NULL);72 int dpO=(strstr(rOrdStr(currRing),"dp")!=NULL); 74 73 int ideal_length; 75 74 if (flag==1) … … 111 110 iT=iT->next; 112 111 } 112 113 if ((flag==1) && (dpO==0)) 114 { 115 //Print ("interred\n"); 116 result=kInterRedOld(result); 117 idSkipZeroes(result); 118 } 119 res->data = (char *)result; 120 res->rtyp = IDEAL_CMD; 121 DestroyList(Q); 122 DestroyList(T); 123 return FALSE; 113 124 } 114 115 if ((flag==1) && (!dpO)) 116 { 117 //Print ("interred\n"); 118 result=kInterRedOld(result); 119 idSkipZeroes(result); 120 } 121 res->data = (char *)result; 122 res->rtyp = IDEAL_CMD; 123 124 DestroyList(Q); 125 DestroyList(T); 126 127 return FALSE; 125 else 126 return TRUE; 128 127 129 128 zero:
Note: See TracChangeset
for help on using the changeset viewer.