OFFSET
0,3
COMMENTS
Theta series is an element of the space of modular forms on Gamma_0(12) of weight 19/2 and dimension 19 over the integers.
REFERENCES
J. H. Conway and N. J. A. Sloane, Sphere Packings, Lattices and Groups, Chap. 6.
LINKS
Andy Huchala, Table of n, a(n) for n = 0..20000
G. Nebe and N. J. A. Sloane, Home page for this lattice.
EXAMPLE
G.f. = 1 + 9396*q^4 + 284528*q^6 + ...
PROG
(Magma)
prec := 30;
coeffs := [1, 0, 9396, 284528, 3309660, 21996036, 103632480, 384538752, 1195104618, 3253783500, 7971340896, 17905302720, 37530681590, 74139276672, 139067432280, 250102136592, 433070833500, 724358442744, 1178016364548];
ls := [4, 2, 4, 0, -2, 4, 0, -2, 0, 4, 0, 0, -2, 0, 4, -2, -2, 0, 0, 0, 4, -2, -1, 1, 0, 0, 0, 4, -2, -1, 0, -1, 1, 2, 2, 4, -2, -2, 0, 1, 1, 2, 2, 2, 4, -2, 0, -2, 0, 1, 1, 0, 0, 0, 4, 1, 1, 0, 0, 0, -2, 0, -1, -1, -2, 4, -2, -1, 0, 0, 0, 1, 1, 1, 1, 1, -2, 4, 0, -1, 1, 1, 0, -1, 1, 0, 0, -1, 1, -1, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -2, 4, 0, -1, 0, 0, 1, 1, 0, 1, 1, -1, 0, 0, 1, -1, 4, 0, 0, 1, 0, -1, 0, 1, 0, 0, 0, -1, 0, 0, 1, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 0, 0, 4, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, -1, 1, 1, 0, 1, 4, 1, 0, -1, 1, 1, 0, -1, -1, 0, 0, 0, 0, 0, 0, 1, -1, 0, 1, 4];
S := SymmetricMatrix(ls);
L := LatticeWithGram(S);
M := ThetaSeriesModularFormSpace(L);
B := Basis(M, prec);
Coefficients(&+[coeffs[i]*B[i] :i in [1..19]]);
CROSSREFS
KEYWORD
nonn
AUTHOR
Andy Huchala, May 08 2023
STATUS
approved