Changeset 808e44 in git
- Timestamp:
- Oct 8, 2018, 11:23:16 AM (6 years ago)
- Branches:
- (u'fieker-DuVal', '117eb8c30fc9e991c4decca4832b1d19036c4c65')(u'spielwiese', 'b4f17ed1d25f93d46dbe29e4b499baecc2fd51bb')
- Children:
- cce6701b31ac1c7276dfdfbb97d3459ae49597a6
- Parents:
- 3e7454022c89e5783f67c3cd5287b211ea27beac
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
Singular/LIB/freegb.lib
r3e7454 r808e44 3659 3659 3660 3660 static proc getlpCoeffs(poly q, poly p) 3661 {list R; poly m;intvec cq,t,lv,rv,bla;3661 {list R; intvec cq,t,lv,rv,bla; 3662 3662 int n = attrib(basering,"isLetterplaceRing"); int d = attrib(basering,"uptodeg"); 3663 3663 int i; 3664 m = p/q; 3665 cq = leadexp(m); 3664 cq = leadexp(p)-leadexp(q); /* p/q */ 3666 3665 for (i = 1; i<= d; i++) 3667 3666 {bla = cq[((i-1)*n+1)..(i*n)];
Note: See TracChangeset
for help on using the changeset viewer.