-- /home/pln/Work/Art/GLITCHWAVE/outputs/digital_flow.gif
do
setcps (80/60/4)
-- resetCycles
d1 $ gF1 $ gM1
  $ midiOn  "^42"  (fast 2 . (<| "k k k k*2"))
  $ midiOff "^42" (<| "k*<1!7 2> ~ . ~ <~!7 [k*2 k]>")
  $ "[jazz]" 
