let
simple_add_dpd g v1 dpd v2 =
add_edge g v1 dpd v2