Changeset 4bde6b in git for Singular/LIB/resbinomial.lib
- Timestamp:
- May 15, 2020, 3:20:00 PM (4 years ago)
- Branches:
- (u'spielwiese', '17f1d200f27c5bd38f5dfc6e8a0879242279d1d8')
- Children:
- a1b40ab8675488c2a4f8e225d9d748ba70340727
- Parents:
- 538e06d0809adf9f75fea000cf70d354bb674ab5
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/LIB/resbinomial.lib
r538e06 r4bde6b 23 23 maxEord(Coef,Exp,k,n,flag); computes de maximum E-order of an ideal given by Coef and Exp 24 24 ECoef(Coef,expP,sP,V,auxc,n,flag); Computes a simplified version of the E-Coeff ideal. The E-orders are correct, 25 but tran formations of coefficients of the generators and powers of binomials25 but transformations of coefficients of the generators and powers of binomials 26 26 cannot be computed easily in terms of lists. 27 27 elimrep(L); removes repeated terms from a list … … 132 132 proc identifyvar() 133 133 "USAGE: identifyvar(); 134 COMPUTE: As ign 0 to variables x and 1 to variables y, only necessary at the beginning134 COMPUTE: Assign 0 to variables x and 1 to variables y, only necessary at the beginning 135 135 RETURN: list, say l, of size the dimension of the basering 136 136 l[i] is: 0 if the i-th variable is x(i), … … 158 158 proc data(ideal K,int k,int n) 159 159 "USAGE: data(K,k,n); K any ideal, k integer (!=0), n integer (!=0) 160 COMPUTE: Construc s a list with the coefficients and exponents of one ideal160 COMPUTE: Constructs a list with the coefficients and exponents of one ideal 161 161 RETURN: lists of coefficients and exponents of K 162 162 EXAMPLE: example data; shows an example … … 719 719 } 720 720 721 // NOTE: coef icients of I = coeficients of J, because I and J differ in a monomial721 // NOTE: coefficients of I = coefficients of J, because I and J differ in a monomial 722 722 723 723 // Detecting errors, negative exponents in expI … … 1002 1002 LL[6]; // list of D_4,D_3,D_2,D_1 1003 1003 LL[7]; // list of H_4,H_3,H_2,H_1 (exceptional divisors) 1004 LL[8]; // list of all exceptional divisors ac umulated1004 LL[8]; // list of all exceptional divisors accumulated 1005 1005 LL[9]; // auxiliary invariant 1006 1006 LL[10]; // intvec pointing out the last step where the function t has dropped … … 1653 1653 1654 1654 idchart=idchart+1;} 1655 else{ // OTHERWISE, CONTINUE CHE KING IF newI=0 or not1655 else{ // OTHERWISE, CONTINUE CHECKING IF newI=0 or not 1656 1656 1657 1657 Coef=extraL[1]; … … 1842 1842 // else{def r=basering;} // CHECK THAT IS NECESSARY !!! 1843 1843 1844 // IF WE ARE IN POS TIVE CHAR1844 // IF WE ARE IN POSITIVE CHAR 1845 1845 1846 1846 if (p>0){list Lring=ringlist(basering); … … 2625 2625 "USAGE: tradtoideal(a,J2,flag); 2626 2626 a intvec, J2 ideal, flag list 2627 COMPUTE: tra slate to an ideal the intvec defining the center2627 COMPUTE: translate to an ideal the intvec defining the center 2628 2628 RETURN: the ideal of the center, given by the intvec a, or J2 if a=0 2629 2629 EXAMPLE: example tradtoideal; shows an example
Note: See TracChangeset
for help on using the changeset viewer.