
once $ "menthe:0" # cut 4  -- INTRO VOIX
  # room 0.5 
  # sz 0.9
  # gain 1

once $ "menthe:1" # cut 4  -- LONGUE MULTIPLE
  # gain 1.3

do
resetCycles
let double = (midiOn "^29" $ fast 2)
setcps (80/60/4)
d1 $ gF1 $ gM2 $ double 
  $ "k . ~ k ~ <~ k*<1 2>>" 
  # "[techno:0,kick:4]"
-- # "[cpu,kick:4]"
d2 $ gF1 $ gM1 $ double $ "~ s ~ s*<1!3 2>" 
  # "vec1_snare:26"
d3 $ gF1 $ gM1 $ "~ h ~ h ~ h ~ h ~ h ~ h ~ h h? h*<1!3 2>" 
  # "ho:1" # gain 0.5 # cut 3
d4 $ gF2 $ gMute3
  $ midiOn "^89" (loopAt "<0.5!7 0.25>")
  $ midiOn "^57" (# n "<3!8 4!8>")
  $ chop 8
  $ loopAt 2  
  $ "menthe" # n "<2!16 5!16>" 
  # room 0.3
  # cut 1
d8 $ gF1 $ gM1
  $ loopAt 0.5 
  $ chop 8 
  $ midiOn "^36" (loopAt 4 . (|> "jungle_breaks:75"))
  $ midiOn "^56" (loopAt 2 . (|> "jungle_breaks:19"))
  -- $ whenmod 8 7 (striate "1 <2 4>")
  $  "breaks165"  
