tree_graph__get_top Function

private pure function tree_graph__get_top(self) result(node)

Type Bound

Arguments

Type	Intent	Optional	Attributes		Name
class(tree_t),	intent(in)			::	self

Return Value type(tree_node_t)

Source Code

   pure function tree_graph__get_top(self) result(node)
      implicit none
      class(tree_t), intent(in) :: self
      type(tree_node_t) :: node

      node = self%nodes(self%top)
   end function tree_graph__get_top