
Mathematica
program for this calculation. This program could be easily modified for a screened Coulomb potential of a more general form
1/r + v_{1} delta + v_{2} delta^{2} r
+ v_{3} delta^{3} r^{2} + ... + v_{N} delta^{N} r^{N1}.
102  110 coefficients for 1s (the ground state, n=1, l=0), 2s (n=2, l=0), and 2p (n=2, l=1) states in exact form calculated earlier
150 coefficients for the ground state of Yukawa potential calculated earlier
Online calculation of Rayleigh  Schrödinger perturbation series
Designed by A. Sergeev