sections :: Parser (Section3, [(Section4, Section5, Section7)])
sections = (,) <$> section3 <*> many1 sections2
sections :: Parser (Section3, [(Section4, Section5, Section7)])
sections = (,) <$> section3 <*> many1 sections2
sections = (,) <$> section3 <*> many1 sections2