Improve implementation of translateToIntervals'
Move 'interval' function to src/SPEAC/Tensions

This implementation of the interval function isn't sufficiently general
to stay in the Types module. E.g. it doesn't differentiate between
ascending and descending intervals.
Implement captureBeats