don't like that much

This commit is contained in:
Aneurin Barker Snook
2016-09-18 05:57:05 +01:00
parent e8679ca5ae
commit 97547e1ecb
+2 -3
View File
@@ -262,15 +262,14 @@ d7 $
# speed "[-3 -2]" # speed "[-3 -2]"
# gain "0.9" # gain "0.9"
{-
d7 $ d7 $
within (0, 0.75) (density (5%3) . sometimes (0.5 <~)) $ whenmod 5 2 (density (5%3)) $
whenmod 16 8 (0.5 ~>) $ whenmod 16 8 (0.5 ~>) $
slow 8 $ slow 8 $
slowspread ($) [gap 16, striate 8] $ slowspread ($) [gap 16, striate 8] $
n "[0 1]/2" # s "nimble" n "[0 1]/2" # s "nimble"
# speed "[-3 -2]" # speed "[-3 -2]"
-} # gain "0.9"
d1 $ stack [ d1 $ stack [
n "[1, 0*4 [~ 0*2] [~ 0/2 0 ~] ~]/4" # s "drum", n "[1, 0*4 [~ 0*2] [~ 0/2 0 ~] ~]/4" # s "drum",