;; rhythm map ;; rmap expects f to take beat + dur + length(lsts) args. (define-macro (rmap beats offset f loopcnt looppos . lsts) `(rmap_helper ,beats ,offset ,f beat dur ,loopcnt ,looppos ,@lsts))