let
direct_dpds pdg node = filter_nodes (
P
.get_all_direct_dpds pdg node)