-s ::= w* Grammar w* => "gram"
-Grammar ::= R+ => "grammar"
-R ::= word ^"::=" Class+/">"
- | word ^"!::=" Class+/">"
+s ::= ws grammar ws => "gram"
+ws !::= w**
+grammar ::= r+/ws => "grammar"
+r ::= word ^"::=" Alternatives /ws
+ | word ^"!::=" Alternatives /ws
ec ::= [~\]\\\-\~] | escaped
-Class ::= Rewrite +/ "|" => "alternatives"
+Alternatives ::= EquiAlt +/ ">"
+EquiAlt ::= Conjuncts +/ "|" => "alternatives"
-Rewrite ::= Rewritex
- | Rewritex ^"&" E+
- | Rewritex ^"&~" E+
+sequence ::= Es
+ > Es ^"/" E /ws
+Es ::= E+
+//es ::= E+/ws
-Rewritex ::= E+ => "rewrite"
- | E+ ^"=>" word
- | E+ ^"=>" quoted
- | E+ "=>" "()" => "wrap"
+Conjuncts ::= rewrite
+ | rewrite ^"&" sequence
+ | rewrite ^"&~" sequence
+
+rewrite ::= sequence /ws => "rewrite"
+ | sequence ^"=>" word /ws
+ | sequence ^"=>" quoted /ws
+ | sequence "=>" "()" /ws => "wrap"
range ::= ec => "range0" | ec ^"-" ec => "range0"
E ::= word => "nonTerminalY"
| [(][)] => "epsilon"
- | ^"{" Class+/">" "}"
+ | ^"{" Alternatives "}"
| "[" [\~]? range* "]" => "range"
| E ^"*/" E
| E ^"+/" E
| (E ^"++" > E ^"+")
| "(" word ^")"
- > ^"(" Class+/">" ")"
+ > ^"(" Alternatives ")"
w !::= " "
| "//" [~\n]* "\n"