(define start-note (lambda (time inst pitch vol . args) (apply play-note time inst pitch vol 10000000.0 args)))