integrate EllipticTheta[3,x] from x=-999/1000 to 999/1000