Changeset 1f637e in git for kernel/gr_kstd2.cc
- Timestamp:
- Jul 19, 2011, 5:11:57 PM (12 years ago)
- Branches:
- (u'jengelh-datetime', 'ceac47cbc86fe4a15902392bdbb9bd2ae0ea02c6')(u'spielwiese', 'f875bbaccd0831e36aaed09ff6adeb3eb45aeb94')
- Children:
- 1c4e9a5798bda4bc92d0013041b99005a50a7d7c
- Parents:
- 6ed8c424bfe6fd9dc397bfdde3e8acf884469342
- git-author:
- Oleksandr Motsak <motsak@mathematik.uni-kl.de>2011-07-19 17:11:57+02:00
- git-committer:
- Mohamed Barakat <mohamed.barakat@rwth-aachen.de>2011-11-09 12:52:40+01:00
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
kernel/gr_kstd2.cc
r6ed8c4 r1f637e 6 6 * ABSTRACT - Kernel: noncomm. alg. of Buchberger 7 7 */ 8 9 #include <kernel/mod2.h> 8 #define PLURAL_INTERNAL_DECLARATIONS 9 10 #include "mod2.h" 10 11 11 12 #ifdef HAVE_PLURAL 12 13 13 #define PLURAL_INTERNAL_DECLARATIONS14 14 15 15 #include <omalloc/omalloc.h> 16 #include <misc/options.h> 17 #include <misc/intvec.h> 18 19 #include <polys/weight.h> 16 20 #include <polys/polys.h> 21 22 #include <polys/nc/nc.h> 23 #include <polys/nc/sca.h> 24 25 26 #include <kernel/febase.h> 17 27 #include <kernel/ideals.h> 18 #include <kernel/febase.h>19 #include <misc/options.h>20 #include <kernel/kutil.h>21 28 #include <kernel/kstd1.h> 22 29 #include <kernel/khstd.h> 23 #include <kernel/kutil.h>24 30 //#include "spolys.h" 25 31 //#include "cntrlc.h" 26 #include <polys/weight.h>27 #include <misc/intvec.h>28 #include <polys/nc/nc.h>29 #include <polys/nc/sca.h>30 32 #include <kernel/ratgring.h> 33 34 #include <kernel/kutil.h> 31 35 32 36 #if 0 … … 1026 1030 // else 1027 1031 { 1028 ecartWeights=(short *)omAlloc(( pVariables+1)*sizeof(short));1032 ecartWeights=(short *)omAlloc(((currRing->N)+1)*sizeof(short)); 1029 1033 /*uses automatic computation of the ecartWeights to set them*/ 1030 1034 kEcartWeights(F->m,IDELEMS(F)-1,ecartWeights); … … 1032 1036 pFDeg=totaldegreeWecart; 1033 1037 pLDeg=maxdegreeWecart; 1034 for(i=1; i<= pVariables; i++)1038 for(i=1; i<=(currRing->N); i++) 1035 1039 Print(" %d",ecartWeights[i]); 1036 1040 PrintLn(); … … 1283 1287 if (ecartWeights) 1284 1288 { 1285 omFreeSize((ADDRESS)ecartWeights,( pVariables+1)*sizeof(short));1289 omFreeSize((ADDRESS)ecartWeights,((currRing->N)+1)*sizeof(short)); 1286 1290 ecartWeights=NULL; 1287 1291 }
Note: See TracChangeset
for help on using the changeset viewer.