s = Doc
Doc = head:Header body:Body /ws
-Header = H:: { "header" { KeyVal */ ws } /ws }
-Body = B:: {Section}*/ws
-Section = SectionHeader ws! (Paragraph Paragraph)
+Header = { "header" { KeyVal */ ws } /ws }
+Body = {Section}*/ws
+Section = SectionHeader ws! Paragraph*
SectionHeader = "==" SectionHeaderBody "=="
SectionHeaderBody = "=" SectionHeaderBody "="
> ws! alphanum++ ws!