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

Use stack to play multiple graphs at once

master
loooph 2023-02-22 19:28:25 +01:00
parent 4a4dc5dc13
commit 0f3df3c7c5
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
dfs.tidal
View File

@ -84,15 +84,15 @@ let edgePattern g e = (n $ pure $ toEnum $ (snd e) `mod` 31) # (s $ pure $ instr
# resonance 0.2 # resonance 0.2
# end 0.2 # end 0.2
# gain 0.8 # gain 0.8
-- p g = (\(x,y) -> fastcat $ concat $ transpose [(vertexPattern g x):(replicate (length y - 1) (s "~")), (edgePattern g) <$> y]) <$> (nodeEdgePairs2 g 1) patternize g = map (\(x,y) -> fastcat [vertexPattern g x, cat $ map (edgePattern g) y]) $ nodeEdgePairs g
p g = map (\(x,y) -> fastcat [vertexPattern g x, cat $ map (edgePattern g) y]) $ nodeEdgePairs g gs = [ k 30
p' = p g , p 2
g = k 10 ]
in d1 $ id in d1 $ id
$ qtrigger -- restart at the beginning of the preorder $ qtrigger -- restart at the beginning of the preorder
$ fast 4.0 -- depends on maximum degree $ fast 4.0 -- depends on maximum degree
$ ghost $ ghost
$ cat p' $ (stack $ map cat $ map patternize gs)
# size "[0.8|0]" # size "[0.8|0]"
# room "[0.7|0]" # room "[0.7|0]"
# lpf "[1000|1500|2000]" # lpf "[1000|1500|2000]"