dag_set_edges_vector_atts Subroutine

private subroutine dag_set_edges_vector_atts(me, ivertex, edges, attributes, label)

set the edges for a vertex in a dag

Type Bound

dag

Arguments

Type IntentOptional Attributes Name
class(dag), intent(inout) :: me
integer(kind=ip), intent(in) :: ivertex

vertex number
integer(kind=ip), intent(in), dimension(:) :: edges
character(len=*), intent(in), dimension(:) :: attributes

other attributes when saving as a diagraph.
character(len=*), intent(in), optional, dimension(:) :: label

Calls

proc~~dag_set_edges_vector_atts~~CallsGraph proc~dag_set_edges_vector_atts dag_module::dag%dag_set_edges_vector_atts none~set_edges dag_module::vertex%set_edges proc~dag_set_edges_vector_atts->none~set_edges proc~add_edge dag_module::vertex%add_edge none~set_edges->proc~add_edge proc~set_edge_vector_vector dag_module::vertex%set_edge_vector_vector none~set_edges->proc~set_edge_vector_vector proc~sort_ascending dag_module::sort_ascending proc~add_edge->proc~sort_ascending proc~set_edge_vector_vector->proc~sort_ascending proc~swap dag_module::swap proc~sort_ascending->proc~swap

Source Code

    subroutine dag_set_edges_vector_atts(me,ivertex,edges,attributes,label)

    class(dag),intent(inout)            :: me
    integer(ip),intent(in)              :: ivertex !! vertex number
    integer(ip),dimension(:),intent(in) :: edges
    character(len=*),dimension(:),intent(in) :: attributes !! other attributes when
                                                           !! saving as a diagraph.
    character(len=*),dimension(:),intent(in),optional :: label

    call me%vertices(ivertex)%set_edges(edges,label=label,attributes=attributes)

    end subroutine dag_set_edges_vector_atts