make_asymtop_state Interface

public interface make_asymtop_state

Module Procedures

private pure elemental module function make_asymtop_state_hfs(dN, dKa, dKc, dJ, dItot, dF, E, EinstA) result(state)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: dN
integer, intent(in) :: dKa
integer, intent(in) :: dKc
integer, intent(in) :: dJ
integer, intent(in) :: dItot
integer, intent(in) :: dF
real(kind=dp), intent(in) :: E
real(kind=dp), intent(in) :: EinstA

Return Value type(asymtop_state_hfs)

private pure elemental module function make_asymtop_state_nohfs(dN, dKa, dKc, E, EinstA, degen) result(state)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: dN
integer, intent(in) :: dKa
integer, intent(in) :: dKc
real(kind=dp), intent(in) :: E
real(kind=dp), intent(in) :: EinstA
integer, intent(in), optional :: degen

Return Value type(asymtop_state_nohfs)