loooph
/
cm-dfs
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Change example graph

master
loooph 2023-02-22 16:31:56 +01:00
parent 6cc0b49118
commit bd03db3174
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
dfs.tidal
View File

@ -65,7 +65,7 @@ k n = buildG (1,n) [(u,v)|u <- [1..n],v <- [1..n]]
-- TODO Wurzel betonen
-- TODO Blätter betonen?
g1 = buildG (0,6) [(1,5),(1,2),(1,3),(2,4),(3,5),(4,2),(4,3),(5,1),(5,2),(5,6),(6,0),(0,6)]
g1 = buildG (0,6) [(1,5),(1,2),(1,3),(2,4),(3,6),(4,2),(4,3),(5,1),(5,2),(5,6),(6,0),(0,6)]
g2 = buildG (0,6) $ id <$> [(0,1),(1,2),(2,3),(3,4),(4,5),(5,6),(2,1)]