--- | Convert a 'ScoreGameVTeam' to/from \<hteam\>. Identical to
--- 'pickle_vteam' modulo the \"h\" and \"v\".
+-- | Convert a 'HTeamXml' to/from \<hteam\>. Identical to 'pickle_vteam'
+-- modulo the \"h\" and \"v\". The team names always seem to be
+-- present here, but in the shared representation, they're optional
+-- (because they show up blank elsewhere). So, we pretend they're
+-- optional.
+--
+-- The \"pitcher\" attribute is a little bit funny. Usually, when
+-- there's no pitcher, the attribute itself is missing. But once in
+-- a blue moon, it will be present with no text. We want to treat
+-- both cases the same, so what we really parse is a Maybe (Maybe
+-- String), and then use the monad 'join' to collapse it into a single
+-- Maybe.