UMatInd Function

public elemental function UMatInd(i, j, k, l) result(ind)

Arguments

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

Return Value integer(kind=int64)


Source Code

    elemental function UMatInd(i, j, k, l) result(ind)
        integer, intent(in) :: i, j, k, l
        integer(int64) :: ind

        ind = UMatInd_base(i, j, k, l, nBI_umat)
    end function UMatInd