do
  solo 1
  solo 3
  solo 4
  solo 5
  unsolo 6
  solo 7

resetCycles

-- Le crapeau russe
do
  setcps (120/60/4)
  d1 -- Kick techno regulier variations filtre
    -- $ whenmod 32 24 (<| n "0*2")
    -- $ whenmod 32 16 (<| n "0")
    $ s "k(<4!3 [4 8 8 4!3]>,4)" # s "jazz"
    # lpf (slow 64 $ range 40 400 sine)
    # gain 0.95
  d3 -- Les snares bogdanesques
    $ fast 4
    $ "~ <h!3 h*2>"
    # s "bogdan:1"
    # cut 3 # gain 0.8
  d4 -- begaye!
    $ someCyclesBy 0.2
     (# gain 0)
    $ rarely (# lpf 3000)
    $ often (# hpf 1500)
    $ loopAt 19
    $ striate "64 <64!3 [64 128]>"
    $ sound "bogdan:14*4"
    # cut 4
    # room 0.4
    # size 0.5
    # gain 0.8
  d5 -- Electric Bassline TODO Variations
    $ note (scale "aeolian" (
      "0 1 0 1 0 1 <2 3> <2 -2>"
      )
      - 24
    )
    # s "supersquare" # voice 0.1 # gain 0.7
  d6 -- Le crapeau!
    $ someCyclesBy 0.2 (# gain 0.7)
    $ loopAt "<0.5!7 0.125>" $ striate 4
    $ sound "bogdan:2"
    # cut 7
    # gain 0
    # pan rand
  d7 -- TODO : ??
    $ slow 2 $ loopAt 2
    $ striate (slow 8 "<8 4 2 1>")
    $ s "break:9"
    # gain 0.4