getNamedSpec :: DevGraphNavigator a => String -> a -> Maybe (a, LNode DGNodeLab)
getNamedSpec n = searchNode (isJust . dgnPredName n)
getNamedSpec :: DevGraphNavigator a => String -> a -> Maybe (a, LNode DGNodeLab)
getNamedSpec n = searchNode (isJust . dgnPredName n)
getNamedSpec n = searchNode (isJust . dgnPredName n)