t_freeze Function

public pure function t_freeze(indices)

Checks if an entry is zeroed due to frozen orbitals being included @param[in] indices array of size 6 containing the indices of the entry in question in the frozen orbital numbering @return t_freeze true if the entry is zeroed

Arguments

Type IntentOptional Attributes Name
integer(kind=int64), intent(in) :: indices(num_inds)

Return Value logical


Contents

Source Code


Source Code

    pure function t_freeze(indices)
        integer(int64), intent(in) :: indices(num_inds)
        logical :: t_freeze

        t_freeze = any(indices < 1)
    end function t_freeze