do d9 $midicmd "stop" # s "midi" hush   let melody = slow 6$ "0 2 [4 8 .] [3 4 3] 8 4 9"   let melody = slow 6 $"0 2 [4 8 .] [3 4 3] 8 4 9"   do cps (86/60/2) d9$ midicmd "midiClock*48" # s "midi"