result_listings :: AutoRacingScheduleListingXml
-> [AutoRacingScheduleListingRaceResultRaceResultListingXml]
result_listings = (concatMap xml_race_result_listing) . xml_race_results
instance ToDb AutoRacingScheduleListingXml where
result_listings :: AutoRacingScheduleListingXml
-> [AutoRacingScheduleListingRaceResultRaceResultListingXml]
result_listings = (concatMap xml_race_result_listing) . xml_race_results
instance ToDb AutoRacingScheduleListingXml where