diff --git a/dfs.tidal b/dfs.tidal index bb2ffd7..1addc62 100644 --- a/dfs.tidal +++ b/dfs.tidal @@ -80,10 +80,10 @@ nubbeKG = buildG (0,89) [(0,1),(0,2),(0,3),(0,4),(0,5),(0,6),(0,52),(0,53),(0,54 let edgePattern g e = (n $ pure $ toEnum $ (snd e) `mod` 31) # (s $ pure $ instrument g e) # gain 1 vertexPattern g v = (scale "ritusen" $ pure $ toEnum $ (v `mod` 31) - 10) # s "supersquare" - # rate 0.1 - # resonance 0.2 - # end 0.2 - # gain 0.8 + # rate 0.1 + # resonance 0.2 + # end 0.2 + # gain 0.8 patternize g = map (\(x,y) -> fastcat [vertexPattern g x, cat $ map (edgePattern g) y]) $ nodeEdgePairs g gs = [ k 30 , p 2