OFFSET
0,2
LINKS
Eric Weisstein's World of Mathematics, Jacobi Theta Functions
MATHEMATICA
nmax = 37; CoefficientList[Series[EllipticTheta[3, 0, EllipticTheta[3, 0, x] - 1], {x, 0, nmax}], x]
CROSSREFS
KEYWORD
nonn
AUTHOR
Ilya Gutkovskiy, Mar 28 2019
STATUS
approved