do
let melody = "<c5'maj c5'min c5'sevenSus4'2 c5'sevenSus4'3 c5'sevenSus4'3 c5'sevenSus4'4 c5'sevenSus4'5 c5'sevenSus4'5>"
setcps (120/60/4)
d1 $ "jazz*4" -- Rythme des tambours
d2 -- Hypnose des mains
$ "~ cp"
# note ("<0!3 <2 -2>>")
# room 0.4
# dry 1
# gain 0.9
d4 -- Chant lunaire
$ note "0(<4!3 <3 5>>,8)"
# note (arp "up" (slow 4 melody))
# "supersquare"
# gain 0.6
# legato 8 # release 4