Changeset 760a78f in git
- Timestamp:
- Apr 28, 2011, 2:50:43 PM (13 years ago)
- Branches:
- (u'spielwiese', 'd1b01e9d51ade4b46b745d3bada5c5f3696be3a8')
- Children:
- aec5c92fa3e0f853348936026c999351aa972656
- Parents:
- 4c6e42085a4a443ab70a8774732655228f25f63c
- git-author:
- Hans Schoenemann <hannes@mathematik.uni-kl.de>2011-04-28 14:50:43+02:00
- git-committer:
- Mohamed Barakat <mohamed.barakat@rwth-aachen.de>2011-11-09 12:31:30+01:00
- Location:
- libpolys/polys
- Files:
-
- 5 edited
Legend:
- Unmodified
- Added
- Removed
-
libpolys/polys/kbuckets.h
r4c6e420 r760a78f 52 52 53 53 ///////////////////////////////////////////////////////////////////////////// 54 // Gets leading monom of bucket, does NOT change Bpoly!!!!!55 // Returned monom is READ ONLY, i.e. no manipulations are allowed !!!!56 //57 inline const poly kBucketGetLm(kBucket_pt bucket);58 59 /////////////////////////////////////////////////////////////////////////////60 54 // Extracts lm of Bpoly, i.e. Bpoly is changed s.t. 61 55 // Bpoly == Bpoly - Lm(Bpoly) … … 204 198 #endif 205 199 206 inline const poly kBucketGetLm(kBucket_pt bucket) 200 ///////////////////////////////////////////////////////////////////////////// 201 // Gets leading monom of bucket, does NOT change Bpoly!!!!! 202 // Returned monom is READ ONLY, i.e. no manipulations are allowed !!!! 203 // 204 inline poly kBucketGetLm(kBucket_pt bucket) 207 205 { 208 206 #ifdef HAVE_COEF_BUCKETS -
libpolys/polys/sbuckets.cc
r4c6e420 r760a78f 48 48 49 49 /// Returns bucket ring 50 constring sBucketGetRing(const sBucket_pt bucket)50 ring sBucketGetRing(const sBucket_pt bucket) 51 51 { return bucket->bucket_ring; } 52 52 -
libpolys/polys/sbuckets.h
r4c6e420 r760a78f 35 35 36 36 /// Returns bucket ring 37 constring sBucketGetRing(const sBucket_pt bucket);37 ring sBucketGetRing(const sBucket_pt bucket); 38 38 39 39 ///////////////////////////////////////////////////////////////////////////// -
libpolys/polys/simpleideals.cc
r4c6e420 r760a78f 370 370 * copy an ideal 371 371 */ 372 #ifdef PDEBUG373 ideal id_DBCopy(ideal h1,const char *f,int l, const ring r)374 {375 int i;376 ideal h2;377 378 id_DBTest(h1,PDEBUG,f,l,r);379 //#ifdef TEST380 if (h1 == NULL)381 {382 h2=idDBInit(1,1,f,l);383 }384 else385 //#endif386 {387 h2=idDBInit(IDELEMS(h1),h1->rank,f,l);388 for (i=IDELEMS(h1)-1; i>=0; i--)389 h2->m[i] = p_Copy(h1->m[i],r);390 }391 return h2;392 }393 #else394 372 ideal id_Copy(ideal h1, const ring r) 395 373 { … … 411 389 return h2; 412 390 } 413 #endif414 391 415 392 #ifdef PDEBUG -
libpolys/polys/simpleideals.h
r4c6e420 r760a78f 21 21 #define MATROWS(i) ((i)->nrows) 22 22 #define MATELEM(mat,i,j) ((mat)->m)[MATCOLS((mat)) * ((i)-1) + (j)-1] 23 23 24 24 }; 25 25 … … 49 49 extern omBin sip_sideal_bin; 50 50 51 #ifdef PDEBUG52 ideal idDBInit (int size, int rank, const char *f, int l);53 #define idInit(A,B) idDBInit(A,B,__FILE__,__LINE__)54 #else55 51 /*- creates an ideal -*/ 56 52 ideal idInit (int size, int rank=1); 57 #endif 53 58 54 /*- deletes an ideal -*/ 59 55 void id_Delete (ideal* h, ring r); … … 71 67 #endif 72 68 73 #ifdef PDEBUG74 ideal id_DBCopy(ideal h1,const char *f,int l, const ring r);75 #define id_Copy(A,R) id_DBCopy(A,__FILE__,__LINE__,R)76 #else77 69 ideal id_Copy (ideal h1,const ring r); 78 #endif 70 79 71 /*adds two ideals without simplifying the result*/ 80 72 ideal id_SimpleAdd (ideal h1,ideal h2, const ring r);
Note: See TracChangeset
for help on using the changeset viewer.