data Team =
Team {
team_id :: String, -- ^ Some of them contain characters
- team_abbreviation :: String,
- team_name :: String }
+ team_abbreviation :: Maybe String, -- ^ Some teams don't have abbreviations,
+ -- or at least, some sample jfilexml
+ -- don't have them for some teams.
+ team_name :: Maybe String -- ^ Some teams don't even have names!
+ }
deriving (Eq, Show)