#######################################################################################################################################################
#Supplemental Material for V. Patkos and K. Pachucki: Antiprotonic atoms with nonperturbative inclusion of vacuum polarization and finite nuclear mass#
#######################################################################################################################################################

Supplemental Material contains code for calculation of energy levels for arbitrary l>1 excited states in antiprotonic atoms.
Main program is PbarSpectr.m which is in the text format and intended to be run in Wolfram Mathematica.
Instructions for running the code are contained in PbarSpectr.m.

List of files contained in the zipped directory in Supplemental Material:

PbarSpectr/PbarSpectr.m
PbarSpectr/nrwfandenergy.m
PbarSpectr/nrwfandenergyFast.m
PbarSpectr/E4s0.m
PbarSpectr/Ehigher.m
PbarSpectr/bethelog.m
PbarSpectr/WKpotential.m
PbarSpectr/gausext.m
PbarSpectr/README.TXT

