c NAMELISTS THAT DEFINE THE SYSTEM IN APH COORDINATES c NAMELISTS FOR THE ROUTINES IN ALL_SUB2 AND ALL_SUB3 $mass amass=1.00d0, bmass=1.00d0, cmass=1.00d0 $end $pot nrho=201 ntheta=10 nchi=361 $end $pot2 rho_min=1.5d0, rho_max=15.d0, const_rho=.false., rho=6.d0, vmin_rho=.false., const_theta=.false., theta=1.57079632679d0, vmin_theta=.false. const_chi=.false., chi=0.0, vmin_chi=.false., $end c This program requires the following input data: c nrho=number of rho values. c ntheta=number of theta values. c nchi=number of chi values. c ndaf=largest desired derivative. c mval=order of the daf fit. This is M. To improve the c fit increase M. c nchanl=number of channels if f(x) is a vector or matrix. $daf nd_daf=40 ndaf=2 mval=32 nchanl=30, diag_opt=2 vzero=.false. direct=.true. jtot=0 $end $dafmax emax=2.2d0 $end $groupdef reduce_group='C6v' $end $junk $end