**************************************************************
**
**  RF  HEATING AND CURRENT DRIVE INPUT FOR VLH MODULE
**  namelist rfsetup
**************************************************************
**
**  vlhmod="enabled" means apply a simple (phenomenological) RF
**    parallel(Landau) or perpendicular diffusion model in which the 
**    magnitude of the diffusion and the resonance regions 
**    (up to nmodsa) are determined through input.  
**    (The model is separate from the rigorous QL/ray tracing   
**    model to be found in the urf module (urfmod.ne."disabled")
**    or the more comprehensive single flux
**    model accessible with vlfmod="enabled".) 
**    The model will be relativistic
**    if relativ="enabled"; non-relativistic otherwise.
**    default:vlhmod="disabled"
**
**  nonrf(1:ngen) is the cycle at which RF excitation begins
**  noffrf(1:ngen) is the cycle at which RF excitation ends
**
**  nrf which was originally set through parameter nrfa
**    can be reset through input. nrf=0 means no RF calculation
**    is to be done using the "rf"(presently null),  "vlf",
**    or ""vlh" modules,
**    If nrf = 0, rf excitation may still be present through the
**    involvement of the "urf" and "rdc" modules.
**    default:nrf=0
**    nrf.ge.1 gives number of consecutive general species 
**    (starting with 1) for contributions by these phenomenological 
**    diffusion coefficients.
**    nrf should be .le.ngena.
**
**  vlhmodes=number of separate resonance regions specified.
**    There may be up to nmodsa (a parameter) regions.
**    default=1.
**
**  vparmin(1:nmodsa) and vparmax(1:nmodsa) define the lower
**    and upper edges of the region in v-parallel space 
**    where the resonances occur (at R=radmaj, see vprprop below). 
**    They are in units of clight.
**    These specifications are velocity/c (NOT momentum-per-mass/c!)
**    (vparmin(i).le.vparmax(i), and specifications may be negative.)
**    npar=1/vparmin and 1/vparmax.
**    Defaults are 0.0.
**    For vlhmod="enabled" only.
**
**  vprpmin(1:nmodsa) and vprpmax(1:nmodsa) define lower and
**    upper limits in perpendicular VELOCITY, in units of clight,
**    of the QL diffusion.  defaults= 0. and 1.e100, respectively.
**
**  vlhpolmn() and vlhpolmx() define lower and upper limits
**    in poloidal angle, of the QL diffusion. (degrees).
**    default: 0. and 180., respectively.
**
**  vdalp is the width of the transition region
**    between zero and maximum diffusion. It is in units of
**    fraction of total resonance region. .03 is reasonable.
**    If vdalp is not used, numerical inconsistencies are
**    magnified.
**    default: vdalp=.03
**
**  vprprop="enabled" means that k-parallel is assumed to scale
**    with R for purposes of computing the resonance region for
**    vlhmod="enabled". ="disabled" means k-parallel assumed
**    constant.
**    default:vprprop="disabled"
**
**  dlndau(1:nmodsa) is the magnitude of the RF diffusion coefficient
**    if vlhmod="enabled". It is in units of vth^2/tauei. Typical
**    values would be 1. or 2.
**    default:dlndau(1:nmodsa)=1.
**
**  vlhprprp(1:nmodsa)="parallel" gives diffusion in u-parallel direction.
**           "perp" gives diffusion in u-perp direction.
**    default:vlhprprp(1:nmodsa)="parallel"
**
**  vlh_karney=Karney-Fisch type cutoff of Dlh with momentum,
**            =1/(1+u/pth)**vlh_karney factor, where 
**             u=momentum-per-mass, pth=(fmass(k)*temp(k,lr_)),
**             k is first general species. 
**             Karney and Fisch, Phys. Fluids 28, 116 (1985)
**             arbitrarily use vlh_karney=1.0.
**    default=0.
**
**  vlhplse.ne."disabled", then turn on square wave oscillating 
**    vlh diffusion with frequency and pulse length specified 
**    thru vlhpon and vlhpoff.  The frequency is 1./(vlhpon+vlhpoff),
**    and vlhpon gives the on-time during the pulse.
**    If vlhplse.eq."tauee", these times are measured in units
**    of tauee, else in terms of seconds.
**    These parameters are also applicable for vlhmod="enabled".
**
**  vlhpon  is the time the repetative pulse is on.
**
**  vlhpoff is the time the repetative pulse is off.
**
**************************************************************