-- | A wrapper around 'Team' that lets us distinguish between home and
-- away teams. See also 'HTeam'. \"V\" (visiting) was chosen instead
--- of \"A\" (away) simply because \"vteam" looks better than
+-- of \"A\" (away) simply because \"vteam\" looks better than
-- \"ateam\". This is purely for type-safety.
--
newtype VTeam = VTeam { vteam :: Team } deriving (Eq, Show)