login
A022083
Theta series of D*_30 lattice.
1
1, 0, 60, 0, 1740, 0, 32480, 0, 438540, 0, 4563672, 0, 38099040, 0, 262336320, 1073741824, 1521151500, 0, 7553367900, 32212254720, 32592806520, 0, 123909200160, 467077693440, 420775407200, 0, 1294230433560, 4391604060160, 3655476494400, 0, 9600504649920
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 + 60*q^2 + 1740*q^4 + ...
PROG
(Sage)
L = [1, 0, 60, 0, 1740, 0, 32480, 0]
M = ModularForms(Gamma1(4), 15)
bases = [_.q_expansion(30) for _ in M.integral_basis()]
f = sum(x*y for (x, y) in zip(bases, L)); list(f) # Andy Huchala, Jul 15 2021
CROSSREFS
Sequence in context: A087535 A058931 A092914 * A174675 A016532 A075080
KEYWORD
nonn
EXTENSIONS
More terms from Andy Huchala, Jul 15 2021
STATUS
approved