Minor cosmetic changes

Add some more comments and use Data.Function.on instead of the current arrow
monstrosity.
Rename module TimeSpot to Types
Group TimeSpots based on their focal item