store_decoding Subroutine

public subroutine store_decoding(j, nI)

Arguments

Type IntentOptional Attributes Name
integer, intent(in) :: j
integer, intent(in) :: nI(nel)

Contents

Source Code


Source Code

    subroutine store_decoding(j, nI)
        implicit none
        integer, intent(in) :: j, nI(nel)

        if (tStoredDets) then
            global_determinants(:, j) = nI
        end if
    end subroutine store_decoding