elementAccess Function

public function elementAccess(this, index) result(kMatel)

Type Bound

kMat_t

Arguments

Type IntentOptional Attributes Name
class(kMat_t) :: this
integer(kind=int64), intent(in) :: index

Return Value real(kind=dp)


Source Code

    function elementAccess(this, index) result(kMatel)
        implicit none
        class(kMat_t) :: this
        integer(int64), intent(in) :: index
        real(dp) :: kMatel

        kMatel = this%kMat_p(index)
    end function elementAccess