Archived
also, backticks need to be escaped
This commit is contained in:
+1
-1
@@ -6,7 +6,7 @@
|
||||
# --
|
||||
let bpm b = cps (b/60)
|
||||
withmod a b c d = (whenmod a b . within (c, d))
|
||||
every' n o f = when ((== (o-1)) . (`mod` n)) f
|
||||
every' n o f = when ((== (o-1)) . (\`mod\` n)) f
|
||||
msil = mapM_ ($ silence)
|
||||
tmod s e = (# nudge (scale 0 s $ fmap (**e) saw1))
|
||||
swing a = within (0.1, 0.4) (a ~>) . within (0.6, 0.9) (a ~>)
|
||||
|
||||
Reference in New Issue
Block a user