c NAMELISTS THAT DEFINE THE SYSTEM IN APH COORDINATES

c NAMELISTS FOR THE ROUTINES IN ALL_SUB2 AND ALL_SUB3

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

 $pot nrho=200 ntheta=75 nchi=601 $end
!$pot nrho=65 ntheta=45 nchi=181 $end

 $pot2
   rho_min=1.2d0, rho_max=16.0d0,
   const_rho=.false.,    rho=6.d0,
   const_theta=.false.,  theta=1.57079632679d0,
   const_chi=.false.,    chi=0.0
 $end

 $daf
   vzero=.false.
 $end