set_edge_vector_vector Subroutine

private subroutine set_edge_vector_vector(me, edges, label, attributes, metadata)

specify the edge indices for this vertex

Type Bound

vertex

Arguments

Type IntentOptional Attributes Name
class(vertex), intent(inout) :: me
integer(kind=ip), intent(in), dimension(:) :: edges
character(len=*), intent(in), optional, dimension(:) :: label
character(len=*), intent(in), optional, dimension(:) :: attributes

other attributes when saving as a diagraph.
class(*), intent(in), optional :: metadata

optional user-defined metadata

Calls

proc~~set_edge_vector_vector~~CallsGraph proc~set_edge_vector_vector dag_module::vertex%set_edge_vector_vector proc~sort_ascending dag_module::sort_ascending proc~set_edge_vector_vector->proc~sort_ascending proc~swap dag_module::swap proc~sort_ascending->proc~swap

Called by

proc~~set_edge_vector_vector~~CalledByGraph proc~set_edge_vector_vector dag_module::vertex%set_edge_vector_vector none~set_edges dag_module::vertex%set_edges none~set_edges->proc~set_edge_vector_vector proc~dag_add_edge dag_module::dag%dag_add_edge proc~dag_add_edge->none~set_edges proc~dag_set_edges_no_atts dag_module::dag%dag_set_edges_no_atts proc~dag_set_edges_no_atts->none~set_edges proc~dag_set_edges_vector_atts dag_module::dag%dag_set_edges_vector_atts proc~dag_set_edges_vector_atts->none~set_edges

Source Code

    subroutine set_edge_vector_vector(me,edges,label,attributes,metadata)

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

    ! elemental assignment:
    me%edges = edge(ivertex=edges,label=label,&
                    attributes=attributes,metadata=metadata)
    call sort_ascending(me%edges)

    end subroutine set_edge_vector_vector