c NAMELISTS THAT DEFINE THE SYSTEM IN APH COORDINATES

c NAMELISTS FOR THE ROUTINES IN ALL_SUB2 AND ALL_SUB3

 $mass
   amass=1.00797d0, bmass=1.00797d0, cmass=1.00797d0
 $end

 $pot nrho=85  ntheta=35 nchi=241 $end

 $pot2
   rho_min=0.64d0, rho_max=16.5d0
 $end