Nuclear reaction rates
| Type | Visibility | Attributes | Name | Initial | |||
|---|---|---|---|---|---|---|---|
| integer, | public | :: | nbranch | = | 1 | Number of reaction branches |
|
| integer, | public | :: | nenergy | = | 1 | Number of beam energies |
|
| real(kind=Float64), | public | :: | logemin | = | 0.d0 | Log-10 minimum energy |
|
| real(kind=Float64), | public | :: | logemax | = | 0.d0 | Log-10 maximum energy |
|
| integer, | public | :: | ntemp | = | 1 | Number of target temperatures |
|
| real(kind=Float64), | public | :: | logtmin | = | 0.d0 | Log-10 minimum temperature |
|
| real(kind=Float64), | public | :: | logtmax | = | 0.d0 | Log-10 maximum temperature |
|
| real(kind=Float64), | public | :: | dlogE | = | 0.d0 | Log-10 energy spacing |
|
| real(kind=Float64), | public | :: | dlogT | = | 0.d0 | Log-10 temperature spacing |
|
| real(kind=Float64), | public | :: | minlog_rate | = | 0.d0 | Log-10 minimum reaction rate |
|
| real(kind=Float64), | public, | dimension(2) | :: | bt_amu | = | 0.d0 | Isotope mass of beam and thermal ions respectively [amu] |
| real(kind=Float64), | public, | dimension(:,:,:), allocatable | :: | log_rate | Log-10 reaction rates: log_rate(energy, temperature, branch) |
type NuclearRates
!+ Nuclear reaction rates
integer :: nbranch = 1
!+ Number of reaction branches
integer :: nenergy = 1
!+ Number of beam energies
real(Float64) :: logemin = 0.d0
!+ Log-10 minimum energy
real(Float64) :: logemax = 0.d0
!+ Log-10 maximum energy
integer :: ntemp = 1
!+ Number of target temperatures
real(Float64) :: logtmin = 0.d0
!+ Log-10 minimum temperature
real(Float64) :: logtmax = 0.d0
!+ Log-10 maximum temperature
real(Float64) :: dlogE = 0.d0
!+ Log-10 energy spacing
real(Float64) :: dlogT = 0.d0
!+ Log-10 temperature spacing
real(Float64) :: minlog_rate = 0.d0
!+ Log-10 minimum reaction rate
real(Float64), dimension(2) :: bt_amu = 0.d0
!+ Isotope mass of beam and thermal ions respectively [amu]
real(Float64), dimension(:,:,:), allocatable :: log_rate
!+ Log-10 reaction rates: log_rate(energy, temperature, branch)
end type NuclearRates