do
setcps (60/60/4)
-- resetCycles
let width = pF "width"
let dMask = (whenmod 8 7 (mask "t t <t [f t]> f"))
d1 $ gF1 $ gM1 
  -- FIXME(#54) d1 drives more controls than the grid gives it (B1 only (C1-3 are the family gF filters)). ^29 now belongs to another orbit, so this step STILL FIRES ACROSS COLUMNS — turning ^29 for its new owner also moves this. NOT commented out: this is a `$`-step and something above it is a partial application waiting for it, so removing it would stop the whole block compiling. Fold it onto d1's own control with gSel.
  $ midiOn "^29" (fast 2)
  $ midiOn "^41"  ((<| "k k k <k k*2 k [~ k*2]>"))
  $ midiOff "^41" (<| "k . <~!8 k(3,8)!8>")
  $ "kick:5"
  # cps ((range 60 120 "^29")/60/4)
d2  $ gF1 $ gM2 
  $ "~ s ~ s ~ s ~ s*2" 
  # "vec1_snare:59" # gain 0.8
  # room 0.4 # dry 0.9
d3 $ gF1 $ gM2 $ "dr*[8 8 <8 <12 24>> 16]"
d4 $ gF2 $ gM3
  $ midiOn "^76" (ply 4)
  $ superimpose (arp "up <up!3 down>" . (|+| note "c'maj9'8"))
  $ superimpose (
    (# lpf 5000) 
    . (# crushbus 41 (range 16 4 "^32"))
  )
  -- $ midiOn "^"
  $ note "<ef3 <fs3 bf3>>"
  # "bassWarsaw" 
  # room 0.8 # sz 0.5 # dry 1.1
d9 $ gF2 $ gM3
  $ midiOn "^89" (slice 8 "0*4") -- TODO Better button?
  -- $ slice 4 "<0 1 2 3>"
  -- $ chop 8 
  $ loopAt 2 
  $ "crutcher:1" 
  # cut 4
  # room 0.4
  # octerbus 91 (range 0 1.4 "^19")
  # crushbus 92 (range 16 3 "^18")
d5 $ gF3 $ gM3 -- MAIN CRUTCH
  $ midiOn "^89" (ply "2 <4 8>")
  -- $ slice 4 "<0 1 2 3>"
  $ chop 8 
  $ loopAt 2 
  $ "crutcher" 
  # cut 5
  # pan 0.3
  # gain 1.4
d7 $ gF3 $ gM3 -- SIDE CRUTCHES
  -- $ slice 4 "<0 1 2 3>"
  $ chop 8 
  $ loopAt 2 
  $ "crutcher" # n "<2!4 3!8 4!4 5!32>" 
  # cut 7
  # pan 0.8
  # gain 1.3
  # room 0.3
d8 $ gF1 $ gM2
  $ midiOff "^60" (mask "t(4,8,1)" . chop 16) -- Bouton Nassim <3
  $ midiOn ("^92") ( -- Bouton Nassim <3
    slice 16 "[0 .. 7] . <[0 .. 7]!7 [0 1 . [2 3]]>"
    . loopAt 0.5 . (# "breaks165") . (# octersub 2)
  )
  $ midiOn "^36" (loopAt 0.5 . (# n 45))
  $ midiOn "^56" (loopAt 0.5 . (# n 55))
  $ loopAt 2 
  $ chop 8
  $ "jungle_breaks:24" # cut 8
