; Example: ;; (let ((beat (*metro* 'get-beat))) ;; (at 2 0 (play dls 60 60 1)) ;; (at 4 '(0 2 3/2) (play dls 48 60 1))) ; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; (define at onbeat)