get_connectivity Function

public function get_connectivity(self, index) result(connectivity)

Arguments

Type IntentOptional Attributes Name
class(abst_element), intent(in) :: self
integer(kind=int32), intent(in) :: index

Return Value integer(kind=int32)


Source Code

    function get_connectivity(self, index) result(connectivity)
        implicit none
        class(abst_element), intent(in) :: self
        integer(int32), intent(in) :: index
        integer(int32) :: connectivity

        if (index < 1 .or. index > self%num_nodes) then
            error stop 'Index out of bounds in get_connectivity'
        end if

        connectivity = self%connectivity(index)
    end function get_connectivity