;; tempo.scm - (c) rohan drape, 2005-2006

;; ppm = pulses per minute, spp = seconds per pulse, pps = pulses per
;; second.

(define (ppm->pps n) (/ n 60.0))
(define (pps->ppm n) (* n 60.0))

(define (ppm->spp n) (/ 1.0 (/ n 60.0)))
(define (spp->ppm n) (* (/ 1.0 n) 60.0))

(define (pps->spp n) (/ 1.0 n))
(define (spp->pps n) (/ 1.0 n))