;; now, run it in a loop (define loop (lambda (beat dur) (test) (callback (*metro* (+ beat (* .5 dur))) 'loop (+ beat dur) dur)))