summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/generic/pgf/graphdrawing/lua/pgf/gd/layered/CycleRemovalBergerS1990a.lua
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/generic/pgf/graphdrawing/lua/pgf/gd/layered/CycleRemovalBergerS1990a.lua')
-rw-r--r--Master/texmf-dist/tex/generic/pgf/graphdrawing/lua/pgf/gd/layered/CycleRemovalBergerS1990a.lua19
1 files changed, 9 insertions, 10 deletions
diff --git a/Master/texmf-dist/tex/generic/pgf/graphdrawing/lua/pgf/gd/layered/CycleRemovalBergerS1990a.lua b/Master/texmf-dist/tex/generic/pgf/graphdrawing/lua/pgf/gd/layered/CycleRemovalBergerS1990a.lua
index 55207b845d3..76deb8adaf6 100644
--- a/Master/texmf-dist/tex/generic/pgf/graphdrawing/lua/pgf/gd/layered/CycleRemovalBergerS1990a.lua
+++ b/Master/texmf-dist/tex/generic/pgf/graphdrawing/lua/pgf/gd/layered/CycleRemovalBergerS1990a.lua
@@ -10,7 +10,6 @@
-- @release $Header$
-
local CycleRemovalBergerS1990a = {}
local lib = require("pgf.gd.lib")
@@ -27,20 +26,20 @@ function CycleRemovalBergerS1990a:run()
for _,node in ipairs(self.graph.nodes) do
-- get all outgoing edges that have not been removed yet
local out_edges = lib.imap(node:getOutgoingEdges(),
- function (edge)
- if not removed[edge] then return edge end
- end)
+ function (edge)
+ if not removed[edge] then return edge end
+ end)
-- get all incoming edges that have not been removed yet
local in_edges = lib.imap(node:getIncomingEdges(),
- function (edge)
- if not removed[edge] then return edge end
- end)
+ function (edge)
+ if not removed[edge] then return edge end
+ end)
if #out_edges >= #in_edges then
- -- we have more outgoing than incoming edges, reverse all incoming
+ -- we have more outgoing than incoming edges, reverse all incoming
-- edges and mark all incident edges as removed
-
+
for _,edge in ipairs(out_edges) do
removed[edge] = true
end
@@ -72,4 +71,4 @@ end
-- done
-return CycleRemovalBergerS1990a \ No newline at end of file
+return CycleRemovalBergerS1990a