lMat_size Function

private function lMat_size(this) result(size)

Return the max. index appearing in this lMat_t (i.e. the number of 6-index integrals)

Type Bound

Arguments

Type	Intent	Optional	Attributes		Name
class(lMat_t),	intent(in)			::	this

Return Value integer(kind=int64)

Source Code

    function lMat_size(this) result(size)
        class(lMat_t), intent(in) :: this
        integer(int64) :: size

        integer(int64) :: nBI

        nBI = int(numBasisIndices(nBasis), int64)
        ! The size is given by the largest index (LMatInd is monotonous in all arguments)
        size = this%indexFunc(nBI, nBI, nBI, nBI, nBI, nBI)
    end function lMat_size