Defines an atomic table for populating and de-populating reaction rates
Type | Visibility | Attributes | Name | Initial | |||
---|---|---|---|---|---|---|---|
integer, | public | :: | nenergy | = | 1 | Number of beam energies/amu |
|
real(kind=Float64), | public | :: | logemin | = | 0.d0 | Log-10 minimum energy/amu |
|
real(kind=Float64), | public | :: | logemax | = | 0.d0 | Log-10 maximum energy/amu |
|
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 |
|
integer, | public | :: | n_max | = | nlevs | Number of initial atomic energy levels |
|
integer, | public | :: | m_max | = | nlevs | Number of final atomic energy levels |
|
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_pop | = | 0.d0 | Log-10 minimum reaction rates for populating transistions |
|
real(kind=Float64), | public | :: | minlog_depop | = | 0.d0 | Log-10 minimum reaction rates for de-populating transistions |
|
real(kind=Float64), | public, | dimension(:,:,:,:), allocatable | :: | log_pop | Log-10 reaction rates for populating transistions |
||
real(kind=Float64), | public, | dimension(:,:,:), allocatable | :: | log_depop | Log-10 reaction rates for de-populating transistions |
type AtomicTransitions
!+ Defines an atomic table for populating and de-populating reaction rates
integer :: nenergy = 1
!+ Number of beam energies/amu
real(Float64) :: logemin = 0.d0
!+ Log-10 minimum energy/amu
real(Float64) :: logemax = 0.d0
!+ Log-10 maximum energy/amu
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
integer :: n_max = nlevs
!+ Number of initial atomic energy levels
integer :: m_max = nlevs
!+ Number of final atomic energy levels
real(Float64) :: dlogE = 0.d0
!+ Log-10 energy spacing
real(Float64) :: dlogT = 0.d0
!+ Log-10 temperature spacing
real(Float64) :: minlog_pop = 0.d0
!+ Log-10 minimum reaction rates for populating transistions
real(Float64) :: minlog_depop = 0.d0
!+ Log-10 minimum reaction rates for de-populating transistions
real(Float64), dimension(:,:,:,:), allocatable :: log_pop
!+ Log-10 reaction rates for populating transistions
real(Float64), dimension(:,:,:), allocatable :: log_depop
!+ Log-10 reaction rates for de-populating transistions
end type AtomicTransitions