-Doc = Doc:: head:{Header} body:Body /ws
-Header = Header:: "header" attrs:{ kv */ ws } /ws
-Body = Body:: sections:(Section*/ws)
-Section = { Section:: header:SectionHeader paragraphs:Paragraph* /ws }
+Doc = head:{Header} body:Body /ws
+Header = "header" attrs:{ KeyVal */ ws } /ws
+Body = {Section}*/ws
+Section = SectionHeader Paragraph* /ws