TimeTypes

- Simplify HasPitch (Behavior a) instance (et al)
- Use original (HasPitch [a] [b]) instance
  - This one uses 'traverse' rather than 'through'