write_channels_to_file Module Subroutine

public module subroutine write_channels_to_file(filename, jmin, jmax, n_states, channels_l, channels_l_j, spin_isomer_kind, symaxis)

Uses

Write rotational channel info to file

Arguments

Type IntentOptional Attributes Name
character(len=*), intent(in) :: filename

File to which we write channels
integer, intent(in) :: jmin

Total angular momentum mim/max
integer, intent(in) :: jmax

Total angular momentum mim/max
type(N_states_type), intent(in) :: n_states(:)
type(asymtop_rot_channel_l_type), intent(in) :: channels_l(:)

Rotational channels
type(asymtop_rot_channel_l_vector_type), intent(in) :: channels_l_j(jmin:jmax)

Rotational channels for each J
integer, intent(in) :: spin_isomer_kind

Kind of nuclear spin to preserve
character(len=1), intent(in) :: symaxis

Symmetry axis for nuclear spin