showGR (PDependency pi)    = " (dependency of " ++ showPI pi            ++ ")"
showGR (PDependency pi)    = " (dependency of " ++ showPI pi            ++ ")"
showGR (PDependency pi)    = " (dependency of " ++ showPI pi            ++ ")"