GoToNextHoleIndices Subroutine

public subroutine GoToNextHoleIndices(session, tReachedLimit)

Arguments

Type IntentOptional Attributes Name
type(ExcitGenSessionType), intent(inout) :: session
logical, intent(out) :: tReachedLimit

Contents

Source Code

GoToNextHoleIndices

Source Code

    subroutine GoToNextHoleIndices(session, tReachedLimit)
        implicit none
        type(ExcitGenSessionType), intent(inout) :: session
        logical, intent(out) :: tReachedLimit
        call IncrementIndex(session%holeIndices, session%rank, nBasis - nEl, tReachedLimit)
    end subroutine GoToNextHoleIndices