Calculates the total ionization cross section for a Neutral Hydrogen atom
in the state colliding with a fully stripped Boron ion at energy eb
Type | Intent | Optional | Attributes | Name | ||
---|---|---|---|---|---|---|
real(kind=Float64), | intent(in) | :: | eb | Relative collision energy [keV/amu] |
Cross Section []
function B5_ioniz_1_janev(eb) result(sigma)
!+ Calculates the total ionization cross section for a Neutral Hydrogen atom
!+in the \(n=1\) state colliding with a fully stripped Boron ion at energy `eb`
!+
!+###Equation
!+$$ B^{5+} + H(1) \rightarrow B^{5+} + H^+ + e $$
!+
!+###References
!+* Page 152 in Ref. 5 [[atomic_tables(module)]]
real(Float64), intent(in) :: eb
!+ Relative collision energy [keV/amu]
real(Float64) :: sigma
!+ Cross Section [\(cm^2\)]
real(Float64), dimension(8), parameter :: A = [351.52d0, 233.63d0, &
3.2952d3, 5.3787d-6, &
1.8834d-2, -2.2064d0, &
7.2074d0, -3.78664d0 ]
sigma = 1.d-16*A(1)*(exp(-A(2)/eb)*log(1 + A(3)*eb)/eb &
+ A(4)*exp(-A(5)*eb)/((eb**A(6)) + A(7)*(eb**A(8))))
end function B5_ioniz_1_janev