once $ s "bd"
  # speed 6

d1 -- kick
-- $ euclid "<4 6>" 4
$ euclid "<<0 1 5 7> 3>" 8
$ sound "bd"
# room 0.2 # dry 1

d2 -- tic toc
$ someCycles (degrade . fast 2)
$ every 8 (off (1/8) id)
$ every' 16 7 degrade
$ every 16 (# gain 0)
$ s "bd(5,8)"
# note "<50 <55 <60 65>>>"
# pan 0.8

d3 -- vibration montante!
$ sometimesBy 0.01 (# crush 4)
$ every 4 (rev)
$ sound "bd"
# note "<<28 21 14 7 0> <7 14 21 28 35 42 49 56 63 70>>"
>| speed (
  segment 200
  $ range 2 4 cosine
  )
# gain 0.8

d8 -- helico
$ every' 4 3 (off 0.125 id)
$ every 8 (# gain 0)
$ every' 8 7 (# gain 1.2)
$ rev $ iter 4 $ loopAt 4 $ chop 16 $ "bd"
# gain 2.5
# pan 0.3

d5 -- cordes guitare pincée
$ someCycles (fast 2 . degrade)
$ someCycles (slow 2 . off 0.125 (|- up 12))
$ off 0.125 (|+ up 12)
$ off 0.125 (|+ up 12)
$ off 0.25 (|- up 12)
$ up "40 47"
# s "bd"


d6 -- clap!
$ stut 2 1.05 0.05
$ s "~ ~ bd ~"
# hpf 400
# lpf 1000