csr_nnz Function

private pure function csr_nnz(self) result(n)

Number of stored entries, including any explicitly stored zeros.

Type Bound

csr_t

Arguments

Type IntentOptional Attributes Name
class(csr_t), intent(in) :: self

Return Value integer(kind=default_int)


Called by

proc~~csr_nnz~~CalledByGraph proc~csr_nnz csr_t%csr_nnz proc~check_weights check_weights proc~check_weights->proc~csr_nnz proc~csr_transpose csr_t%csr_transpose proc~csr_transpose->proc~csr_nnz proc~a_star a_star proc~a_star->proc~check_weights proc~dijkstra dijkstra proc~dijkstra->proc~check_weights proc~path_cost path_cost proc~path_cost->proc~check_weights

Source Code

   pure function csr_nnz(self) result(n)
      !! Number of stored entries, including any explicitly stored zeros.
      class(csr_t), intent(in) :: self
      integer(default_int) :: n

      n = 0
      if (allocated(self%col_idx)) n = int(size(self%col_idx), default_int)
   end function csr_nnz