A029770 Theta series of 10-dimensional lattice (C6 X SU(4,2)):C2 with minimal norm 4.

1, 0, 270, 960, 3240, 8640, 17790, 25920, 62910, 81600, 124416, 198720, 287160, 311040, 596700, 619200, 806760, 1140480, 1465710, 1425600, 2458080, 2383680, 2903040, 3818880, 4607790, 4250880, 7089660, 6518400, 7575120, 9633600, 11275776, 10082880, 16150590, 14587200, 16588800, 20442240, 23261640, 20424960

Offset

0,3

Links

Table of n, a(n) for n=0..37.

G. Nebe and N. J. A. Sloane, Home page for this lattice

Formula

See Magma program.

Prog

(Magma)
A:=Matrix([[4, 1, 1, -2, 1, -2, -2, -2, 2, -2], [1, 4, 0, -1, 2, 1, 0, 0, 2, -2], [1, 0, 4, 1, 2, -2, 1, 1, 2, 1], [-2, -1, 1, 4, -1, 1, 2, 1, -1, 2], [1, 2, 2, -1, 4, -1, 1, 1, 2, 0], [-2, 1, -2, 1, -1, 4, 0, 1, -1, 0], [-2, 0, 1, 2, 1, 0, 4, 2, -1, 1], [-2, 0, 1, 1, 1, 1, 2, 4, -1, 2], [2, 2, 2, -1, 2, -1, -1, -1, 4, -1], [-2, -2, 1, 2, 0, 0, 1, 2, -1, 4]]);
L:=LatticeWithGram(A);
T<q>:=ThetaSeries(L, 75);
S:=[];
for i in [0 .. 37] do S cat:= [Coefficient(T, 2*i)]; end for;
S; \\ Josiah Park, Feb 24 2019

Crossrefs

Sequence in context: A180151 A278130 A206088 * A028529 A109025 A028535

Adjacent sequences: A029767 A029768 A029769 * A029771 A029772 A029773

Keyword

nonn

Author

N. J. A. Sloane.

Extensions

More terms from Josiah Park, Feb 24 2019

Status

approved