do
let gF =  (# djfbus 1 (range 0.05 0.95 "^49"))
let gF2 = (# djfbus 2 (range 0.05 0.95 "^50"))
setcps (120/60/4)
d1 $ gF $ "jazz*4"
d2 $ gF $ "~ cp"
  # lpf 3000
  # gain 0.9
d3 $ gF $ "dr*[8 16]"
d4 $ gF2 $ note (scale "aeolian" "<0 0 1 2 0 2 -1 0>")
  # "giorgio_syn:1"
  # cut 4
  # gain 0.7
d5 $ gF $ loopAt 2 $ "break" # gain 1.1
  # cut 5