module fpreact_parameters
 
  !  these are standard values for argument of `hatom_btsigv/
 
  !  "irtype" -- reaction table selection
  integer, parameter :: fpreact_CX = 1    ! <sigma*v>cx
  integer, parameter :: fpreact_II = 2    ! <sigma*v>ii
  integer, parameter :: fpreact_EAV = 3   ! <Eav>cx
  integer, parameter :: fpreact_FD = 4    ! <vb.vtarg>/|vb*vth|
 
  !  "beamchrg" -- whether beam is neutral and target is ionized, or
  !                vice versa
 
  integer, parameter :: fpreact_NEUTRAL_BEAM = 1
  integer, parameter :: fpreact_ION_BEAM = 2
 
  !  common Z's of elements...
 
  integer, parameter :: fpreact_Z_H = 1
  integer, parameter :: fpreact_Z_He = 2
  integer, parameter :: fpreact_Z_Li = 3
  integer, parameter :: fpreact_Z_C = 6
  integer, parameter :: fpreact_Z_O = 8
 
end module fpreact_parameters
