OFFSET
1,4
COMMENTS
Theta series terms of shorter Coxeter-Todd lattice.
LINKS
G. Nebe and N. J. A. Sloane, The Lattice O_10
FORMULA
See Magma program.
PROG
(Magma)
A:=Matrix([[3, -1, -1, -1, -1, 1, 0, -1, -1, 1], [-1, 3, -1, 1, 0, -1, 1, 1, -1, 1], [-1, -1, 3, 1, 0, -1, -1, 0, 1, -1], [-1, 1, 1, 3, -1, -1, -1, 1, 1, 0], [-1, 0, 0, -1, 3, -1, 1, -1, 0, -1], [1, -1, -1, -1, -1, 3, -1, 0, 0, 1], [0, 1, -1, -1, 1, -1, 3, -1, -1, 0], [-1, 1, 0, 1, -1, 0, -1, 3, 1, 1], [-1, -1, 1, 1, 0, 0, -1, 1, 3, -1], [1, 1, -1, 0, -1, 1, 0, 1, -1, 3]]);
L:=LatticeWithGram(A);
T<q>:=ThetaSeries(L, 37);
S:=[];
for i in [0 .. 37] do S cat:= [Coefficient(T, i)]; end for;
S;
CROSSREFS
KEYWORD
nonn
AUTHOR
Josiah Park, Feb 15 2019
STATUS
approved