Changeset 551fd7 in git
 Timestamp:
 Nov 16, 1999, 1:39:31 PM (24 years ago)
 Branches:
 (u'spielwiese', '828514cf6e480e4bafc26df99217bf2a1ed1ef45')
 Children:
 97d3c00617cfd87ee2359033f8b2ae1bbf23a456
 Parents:
 5952b6d526bb76067dc7af45610780364733945c
 Location:
 Singular
 Files:

 5 edited
Legend:
 Unmodified
 Added
 Removed

Singular/extra.cc
r5952b6 r551fd7 2 2 * Computer Algebra System SINGULAR * 3 3 *****************************************/ 4 /* $Id: extra.cc,v 1.11 5 19991114 21:46:28 wenkExp $ */4 /* $Id: extra.cc,v 1.116 19991116 12:39:26 obachman Exp $ */ 5 5 /* 6 6 * ABSTRACT: general interface to internals of Singular ("system" command) … … 485 485 { 486 486 res>rtyp=INT_CMD; 487 res>data=( int)complexNearZero((gmp_complex*)h>Data(),(int)h>next>Data());487 res>data=(void*)complexNearZero((gmp_complex*)h>Data(),(int)h>next>Data()); 488 488 return FALSE; 489 489 } … … 510 510 } 511 511 res>rtyp=INT_CMD; 512 res>data=( int)getGMPFloatDigits();512 res>data=(void*)getGMPFloatDigits(); 513 513 return FALSE; 514 514 } 
Singular/ideals.cc
r5952b6 r551fd7 2 2 * Computer Algebra System SINGULAR * 3 3 ****************************************/ 4 /* $Id: ideals.cc,v 1.7 3 19991115 17:20:06obachman Exp $ */4 /* $Id: ideals.cc,v 1.74 19991116 12:39:27 obachman Exp $ */ 5 5 /* 6 6 * ABSTRACT  all basic methods to manipulate ideals … … 1347 1347 */ 1348 1348 ideal idSyzygies (ideal h1, tHomog h,intvec **w, BOOLEAN setSyzComp, 1349 BOOLEAN setRegularity, int °)1349 BOOLEAN setRegularity, int *deg) 1350 1350 { 1351 1351 ideal s_h1; … … 1426 1426 idSkipZeroes(e); 1427 1427 1428 if ((!isMonomial) 1428 if (deg != NULL 1429 && (!isMonomial) 1429 1430 && (!TEST_OPT_NOTREGULARITY) 1430 1431 && (setRegularity) … … 1436 1437 resolvente res = sySchreyerResolvente(e,1,&length,TRUE, TRUE); 1437 1438 intvec * dummy = syBetti(res,length,®, *w); 1438 deg = reg+2;1439 *deg = reg+2; 1439 1440 delete dummy; 1440 1441 for (j=0;j<length;j++) 
Singular/ideals.h
r5952b6 r551fd7 4 4 * Computer Algebra System SINGULAR * 5 5 ****************************************/ 6 /* $Id: ideals.h,v 1.1 3 19991115 17:20:07obachman Exp $ */6 /* $Id: ideals.h,v 1.14 19991116 12:39:30 obachman Exp $ */ 7 7 /* 8 8 * ABSTRACT  all basic methods to manipulate ideals … … 83 83 //ideal idSyzygies (ideal h1, tHomog h,intvec **w); 84 84 ideal idSyzygies (ideal h1, tHomog h,intvec **w, BOOLEAN setSyzComp=TRUE, 85 BOOLEAN setRegularity=FALSE, int °=0);85 BOOLEAN setRegularity=FALSE, int *deg = NULL); 86 86 ideal idLiftStd (ideal h1, matrix *m, tHomog h=testHomog); 87 87 
Singular/syz.cc
r5952b6 r551fd7 2 2 * Computer Algebra System SINGULAR * 3 3 ****************************************/ 4 /* $Id: syz.cc,v 1.2 8 19991115 17:20:52obachman Exp $ */4 /* $Id: syz.cc,v 1.29 19991116 12:39:31 obachman Exp $ */ 5 5 6 6 /* … … 500 500 if ((currQuotient==NULL)&&(syzIndex==0)&& (!TEST_OPT_DEGBOUND)) 501 501 { 502 res[/*syzIndex+*/1] = idSyzygies(res[0/*syzIndex*/],hom,&w,FALSE,TRUE, Kstd1_deg);502 res[/*syzIndex+*/1] = idSyzygies(res[0/*syzIndex*/],hom,&w,FALSE,TRUE,&Kstd1_deg); 503 503 if ((!TEST_OPT_NOTREGULARITY) && (Kstd1_deg>0)) test = Sy_bit(OPT_DEGBOUND); 504 504 } 
Singular/syz1.cc
r5952b6 r551fd7 2 2 * Computer Algebra System SINGULAR * 3 3 ****************************************/ 4 /* $Id: syz1.cc,v 1.4 8 19991115 17:20:53obachman Exp $ */4 /* $Id: syz1.cc,v 1.49 19991116 12:39:31 obachman Exp $ */ 5 5 /* 6 6 * ABSTRACT: resolutions … … 1975 1975 { 1976 1976 j = IDELEMS(rr[l]); 1977 while (( l>0) && (rr[l]>m[j1]==NULL)) j;1977 while ((j>0) && (rr[l]>m[j1]==NULL)) j; 1978 1978 ((*syzstr>resolution)[l+1]) = j; 1979 1979 l++;
Note: See TracChangeset
for help on using the changeset viewer.