login
A022079
Theta series of D*_26 lattice.
1
1, 0, 52, 0, 1300, 0, 20800, 0, 239252, 0, 2107560, 0, 14797120, 67108864, 85155200, 0, 410468500, 1744830464, 1688240372, 0, 6030043240, 21810380800, 19043826880, 0, 54177864000, 176227876864, 141373532200, 0, 343594659200, 1046898278400, 786344740480, 0
OFFSET
0,3
REFERENCES
J. H. Conway and N. J. A. Sloane, "Sphere Packings, Lattices and Groups", Springer-Verlag, p. 120.
LINKS
EXAMPLE
G.f. = 1 + 52*q^2 + 1300*q^4 + ...
PROG
(SageMath)
L = [1, 0, 52, 0, 1300, 0, 20800]
M = ModularForms(Gamma1(4), 13)
bases = [_.q_expansion(20) for _ in M.integral_basis()]
f = sum(x*y for (x, y) in zip(bases, L)); list(f)
CROSSREFS
Sequence in context: A214373 A230299 A308235 * A230107 A275412 A100990
KEYWORD
nonn
EXTENSIONS
More terms from Andy Huchala, Jul 14 2021
STATUS
approved