|
@@ -57,7 +57,7 @@ d3 $
|
|
# vowel "e o"
|
|
# vowel "e o"
|
|
|
|
|
|
d1 $ stack [
|
|
d1 $ stack [
|
|
- (1 ~>) $ sound "cy/8",
|
|
|
|
|
|
+ (1 ~>) $ s "cy/8",
|
|
every' 8 8 (overlay $ (0.32 ~>) $ s "k*2") $ s "k",
|
|
every' 8 8 (overlay $ (0.32 ~>) $ s "k*2") $ s "k",
|
|
(0.5 ~>) $ s "sn/2"
|
|
(0.5 ~>) $ s "sn/2"
|
|
]
|
|
]
|
|
@@ -77,7 +77,7 @@ d2 $
|
|
# gain "0.6"
|
|
# gain "0.6"
|
|
|
|
|
|
d1 $ stack [
|
|
d1 $ stack [
|
|
- (1 ~>) $ sound "cy/8",
|
|
|
|
|
|
+ (1 ~>) $ s "cy/8",
|
|
every' 8 8 (overlay $ (0.32 ~>) $ s "k*2") $
|
|
every' 8 8 (overlay $ (0.32 ~>) $ s "k*2") $
|
|
every' 12 2 (density 3) $
|
|
every' 12 2 (density 3) $
|
|
s "k",
|
|
s "k",
|
|
@@ -146,7 +146,7 @@ d4 $
|
|
# cut "4"
|
|
# cut "4"
|
|
|
|
|
|
d1 $ stack [
|
|
d1 $ stack [
|
|
- (1 ~>) $ sound "cy/8",
|
|
|
|
|
|
+ (1 ~>) $ s "cy/8",
|
|
every' 8 8 (overlay $ (0.32 ~>) $ s "k*2") $
|
|
every' 8 8 (overlay $ (0.32 ~>) $ s "k*2") $
|
|
every' 12 2 (density 3) $
|
|
every' 12 2 (density 3) $
|
|
s "k",
|
|
s "k",
|
|
@@ -305,4 +305,6 @@ d2 $
|
|
s "hh hh:2"
|
|
s "hh hh:2"
|
|
# gain "0.6"
|
|
# gain "0.6"
|
|
|
|
|
|
|
|
+mapM_ ($ silence) [d6,d7]
|
|
|
|
+
|
|
hush
|
|
hush
|