This Mathematica code is an accompaniment to the paper: Pade Approximants of the Green Function in Spherically Symmetric Spacetimes. It caculates the Green function, G(x,x’), for spherically symmetric spacetimes as a Taylor series in the coordinate separation of the points. Please see the paper for a full description.
The full code is available to download here, including precalculated results for Schwarzschild, Nariai and Reissner-Nordstrom spacetimes. It should work with versions 6, 7 and 8 of Mathematica and possibly other versions. It is provided as free software under the terms of the GNU General Public License version 2 (or later). If you find this code useful, please cite the paper Phys. Rev. D 79, 124044 (2009).