locationsElements :: [Element] -> Set Id
locationsElements = S.unions . map locationsElement
locationsElements :: [Element] -> Set Id
locationsElements = S.unions . map locationsElement
locationsElements = S.unions . map locationsElement