get_determinant Function

public function get_determinant(j) result(nI)

Arguments

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

Return Value integer, (nel)


Contents

Source Code


Source Code

    function get_determinant(j) result(nI)
        implicit none
        integer, intent(in) :: j
        integer :: nI(nel)

        if (tStoredDets) then
            nI = global_determinants(:, j)
        else
            nI = 0
        end if
    end function get_determinant