diff --git a/dfs.tidal b/dfs.tidal index 895058f..1cdc17b 100644 --- a/dfs.tidal +++ b/dfs.tidal @@ -61,6 +61,9 @@ instrument g e | p crossG = "amencutup" | otherwise = "rave" -- edge is (x,x) where p f = e `elem` (f g) +-- +-- complete graph +k n = buildG (1,n) [(u,v)|u <- [1..n],v <- [1..n]] -- TODO Tiefe -- TODO Wurzel betonen