(define theSound (rsound-read "/triangle1.wav"))
(define (rsound-reverse t rsound)
  (rsound-ith/left rsound (- (rsound-frames rsound) 1 t)))
(rsound-play (fun->mono-rsound samplerate samplerate (signal rsound-reverse theSound)))