From 97b006f37310da64b659284ba6a98b177f3e356d Mon Sep 17 00:00:00 2001
From: loooph <loooph@gmx.de>
Date: Wed, 22 Feb 2023 05:23:08 +0100
Subject: [PATCH] =?UTF-8?q?change=20to=20change=20to=20ritusen=20scale=20?=
 =?UTF-8?q?=C2=AF\=5F(=E3=83=84)=5F/=C2=AF?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 dfs.tidal | 5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

diff --git a/dfs.tidal b/dfs.tidal
index 09fb9b1..b373a2e 100644
--- a/dfs.tidal
+++ b/dfs.tidal
@@ -68,10 +68,7 @@ g1 = buildG (0,6) [(1,5),(1,2),(1,3),(2,4),(3,5),(4,2),(4,3),(5,1),(5,2),(5,6),(
 
 g2 = buildG (0,6) $ id <$> [(0,1),(1,2),(2,3),(3,4),(4,5),(5,6),(2,1)]
 
-preorderF $ dff g2
-
--- numbers ist nur für debug
-let edgePattern g e = (scale "major" $ pure $ snd e) # (s $ pure $ instrument g e)
+let edgePattern g e = (scale "ritusen" $ pure $ snd e) # (s $ pure $ instrument g e)
                                                      # gain 1
     vertexPattern g v = (n $ pure $ toEnum v) # s "numbers"
                                               # end 0.4