do
-- resetCycles  
setcps (128/60/4)
d1 $ gF1 $ gM1 -- KICK: Sub thud, 4otf with flourish (NTO: deepens over time)
  $ midiOn  "^41" (<| "k k k <k k*2 k [~ k]>") -- ON: 4otf + flourish variations
  $ midiOff "^41" (<| "k ~ ~ <~!3 k>") -- OFF: sparse intro
  $ sometimesBy "^29" ( -- ^29: ghost doubles (pre-drop energy)
    superimpose (("0.07" <~) . (|* gain 0.7))
    )
  $ "[techno:0,jazz]"
  # gain 1.5
d2 $ gF1 $ gM2 -- CLAP: Dry quiet snap, contretemps (enters late)
  -- NTO: peak=0.13 (QUIET!), att=10ms, dom=1292Hz, 0% sub, beats 1&3
  $ midiOn "^42" (<| "cp ~ cp ~") -- ON: contretemps (NTO climax)
  $ midiOff "^42" (<| "~ cp ~ <~ cp*<1 2>>") -- OFF: backbeat (our touch)
  $ sometimesBy "^30" ( -- ^30: flam probability
    superimpose (("e" <~) . (|* gain 0.6))
    )
  $ "h2ogmcp"
  # hpf 800 # lpf 4000 -- pure mid-snap, no sub
  # room 0.1 # dry 1.5 -- very dry
  # gain (slow 32 $ range 0.8 1.2 saw) -- 32-bar: clap grows into the mix
  # pan 0.55
d3 $ gF1 $ gM2 -- OH/CY: Subtle offbeat hats, ^44 morphs to cymbal shimmer
  -- NTO: OH on upbeats, centroid brightens 4000→8400Hz. Breakdown = quiet cymbal.
  $ midiOn "^43" (stut 3 0.6 "s") -- push: rolls
  -- $ midiOn "^44" ( -- ON: cymbal shimmer (quiet, bright, breakdown character)
    -- (|* gain 0.94) . (# legato 0.2) . (# "h2ogmcy:1") . (# hpf 5000)
    -- )
  -- -- $ midiOff "^44" (mask "t(3,8)") -- OFF: sparse euclidean (subtle)
  $ sometimesBy "^31" (ply "<2!3 [2 4]>") -- ^32: roll probability
  $ "~ h ~ h ~ h ~ <h!3 h*2>" -- offbeat pattern with flourish
  # "h2ogmhh"
  # n "~ 3 ~ 2 ~ 4 ~ <3!3 [3 6]>" -- varying openness per hit
  # legato (range 0.05 0.9 "^18") -- ^52: tightness
  # cut "~ 3 ~ 3 ~ 3 ~ <3!3 [3 0]>" -- last hit: cut 0 = rings over bar boundary
  # room (slow 32 $ range 0.2 0.45 saw) -- 32-bar: space grows (NOT dry!)
  # sz (slow 32 $ range 0.1 0.3 saw) -- 32-bar: tail lengthens
  # dry 1
  # pan 0.42
  # gain 0.9
  -- # gain (slow 32 $ range 1.3 2 saw * "0.7 0.8 0.65 [0.75|0.85] 0.69 0.8 ~ <0.9!3 [0.9 0.5]>")
  -- 32-bar swell * per-hit velocity (the original subtle dynamics)
-- FIXME BASS!!! 
d4 $ gF2 $ gM3 -- BASS (the FIXME): D minor, grounded in measured key (corr=0.903)
  $ midiOn "^45" (# crush 6)
  $ note (scale "aeolian" "0 . 0*<1 2> . <0 3> . 0*<1 1 4>" + 2 - "[24,36]")  -- +2 = D root
  # "bassWarsaw" # voice 0.05
  # lpf (range 300 1800 "^32") # resonance 0.2
  # gain 1.15
-- COMMENTED OUT 2026-08-03, and this is the line that broke the whole file.
-- "Claude's Weight" had one note figure ("0@5 0 <2 3> <1 0>"), and that figure
-- moved into Gesture's midiOff below. What was left is `midiOn "^45" (# crush 6)`
-- — a FUNCTION — sitting as the left operand of `#`, with no pattern to apply it
-- to. GHC pointed at THIS block while blaming line 409 of the generated file, so
-- the error looked like it came from Gesture. Nothing musical is lost: the last
-- d4 in the file wins, and that was never this one. Restore by un-dashing and
-- giving it a note pattern of its own.
-- d4 $ gF2 $ gM3 -- Claude's Weight
--   $ midiOn "^45" (# crush 6)
--   $ note (scale "aeolian" "0@5 0 <2 3> <1 0>" + 2 - "[24,36]")
--   # "bassWarsaw" # voice 0.05
--   # lpf (range 300 1800 "^32") # resonance 0.2
--   |* gain ("1@5 0.94 0.98 0.92" * 1.15)
d4 $ gF2 $ gM3 -- Claude's Gesture
  $ midiOn "^45" (# crush 6)
  $ (0.125 <~)
  -- midiOn/midiOff take a FUNCTION (BootTidal:391 — someCyclesBy), so the note
  -- pattern goes in a LEFT section of `#`: note supplies the rhythm, bassWarsaw
  -- and the params below merge in. Same shape as the single-figure version this
  -- replaced; ON = the moving arp, OFF = the grounded root.
  $ midiOn "^44" ((note (scale "aeolian"
      "<[0 3 0@14] [0 <2 4> 0@14] [3 0 2@14] [0 3 <0 -3>@13 ~]>"
      + 2 - "[24,36]")) #)
  $ midiOff "^44" ((note (scale "aeolian"
      "0@5 0 <2 3> <1 0>"
      + 2 - "[24,36]")) #)
  $ "bassWarsaw" # voice 0.05
  # resonance 0.2
  # crushbus 41 (range 16 3.5 "^52")
  # room 0.4 # sz 0.5 # dry 1.1
  # gain 1.15
d6 $ gF1 $ gM3 -- ACID ARP: D minor, 4/16 square rises, ^59-driven
  $ midiOn "^90" (arp "<up updown pinkyup speedupdown>")
  $ off 0.125 ((|+ note 12) . (|* gain 0.6))
  $ note (scale "aeolian" (run "<4 16>") + "<0 3 5 3>" + 2)  -- +2 = D root
  # s "superzow" # voice 0.05
  # lpf (range 500 5000 "^58") # resonance 0.35
  # gain 0.8
d5 $ gF3 $ gM3 -- Piano Desirable show 
  $ midiOn "^89" (ply "<2 4 [<4!3 16>  <8 16>]>")
  $ slice 4 "<0 1 2 3>" 
  $ "desire" # n "<1!4 2!4 3!7 4 3!6 2 2 3!7 4>" 
  # cut 5 # lpf 4000  
  # room 0.24 # sz 0.8
  # octersubbus 51 (range 0 1.5 "^33")
  # delay "<0.2!3 0.8>"
  # delayt 1 # delayfb 0.3
  # gain 1.3
d9 $ gF2 $ gM3 -- Announcing SYNTH
  $ superimpose (
    ((|* gain (range 0 1.5 "^17"))) . -- A5 = d9's effect (was ^19, shared with d7 below)
     (# n 5) . (# cut 91))
  $ "desire_synth/2" # "desire" 
  # n "<0>" 
  # cut 9 -- SYNTH
  -- # end 0.1s
  -- # lpf 3000
  # gain 1.9
  # room 0.4 # sz 0.7 # dry 1.4
d7 $ gF3 $ gM3 -- Voices FIXME order of voices? not sure which is what atm ahah
  $ midiOn "^91" (ply "2 <2!3 <4 8>>")
  $ fix ((6/8)  ~>) (n 6)
  $ fix ((1/8)  ~>) (n 9)
  $ fix ((5/8)  <~) (n "[11,12]")
  $ slow 2 
  -- FIXME(#54) the one-knob link is gone: ^19 used to drive this NANANA *and* d9's gain
  -- swell together. d9 now has its own A5 (^17), so they are two gestures. Parked, not
  -- lost — if the linked swell was the point, gSel or a shared knob restores it.
  $ midiOn "^35" (>| n "<11 12>") -- NANANA | B7 = d7's primary effect
  $ midiOn "^55" (>| n "<10 ~>") -- FREE FROM DESIRE
  $ midiOn ("^59" - "^55") ( -- Refrain
    (>| n "<10!4 11!4>")
    ) -- Refrain
  $ midiOff "^59" ( -- Couplet
      (>| n "<6 ~ 6 ~ 7 ~ 7 ~ 8 ~ 8 8 9 9 9 9>"))
  $ "desire"    
  # cut 7
  # gain 1.3
d8 $ gF1 $ gM2
  $ loopAt 2
  $ midiOn "^92" ( -- Bouton Nassim <3
    loopAt 0.5 . (# "breaks165")
    -- . (# octer 0.4) . ( octersubsub 4)
    . (# lpf 2500)
    . (# room 0)
    . (|* gain 1.2)
  )
  $ midiOff "^60" (mask "f(8,16)" . chop 16)
  $ midiOn "^36" (# "jungle_breaks:7")
  $ midiOn "^56" (# "jungle_breaks:37")
  $ chop 16 $  "jungle_breaks:101"
  # cut 8
  -- FIXME Acid sth? <3
d10 $ gF1 $ gM3 $ mask "<t f!7>" $ "risers:8" -- safe riser (#33)
  
  
  once $ "desire" # n "[6]" # cut 1
  
