sort_last_transition Interface

public interface sort_last_transition

Module Procedures

private pure subroutine sort_last_transition_hfs(transitions, iout)

Sort the last element in the array to where it should go, assuming the rest of the array is sorted. Optionally return the index of the sorted element

Arguments

Type IntentOptional Attributes Name
type(asymtop_transition_hfs), intent(inout) :: transitions(:)

The array of transitions
integer, intent(out), optional :: iout

The array to which the last state was sorted

private pure subroutine sort_last_transition_nohfs(transitions, iout)

Sort the last element in the array to where it should go, assuming the rest of the array is sorted. Optionally return the index of the sorted element

Arguments

Type IntentOptional Attributes Name
type(asymtop_transition_nohfs), intent(inout) :: transitions(:)

The array of transitions
integer, intent(out), optional :: iout

The array to which the last state was sorted