How to convolve two sounds?

Try something like:

(let ((signal (aref s 0))
      (impulse (extract-abs 0 0.1 (aref s 1))))
  (vector
    (convolve signal impulse)
    (aref s 1)))

where the sound that you wish to process is the left (upper) channel of a stereo track, and the impulse is the first 0.1 seconds of the right (lower) channel.