1 <Expr> ::= <id> ['hd'|'tl'|'fst'|'snd] <Expr`>
7 | '(' <Expr> ')' <Expr`>
8 | <id> '(' [<ActArgs>] ')' <Expr`>
10 | '(' <Expr> ',' <Expr> ')' <Expr`>
11 <Expr`> ::= <Op2> <Expr> <Expr`> | e
12 <Op2> ::= '+' | '-' | '*' | '/' | '%' | '==' | '<' | '>' | '<=' | '>='
13 | '!=' | '&&' | '||' | ':'
15 <ActArgs> ::= <Expr> [',' ActArgs]
17 <VarDecl> ::= (<Type> | 'var') <id> '=' <Expr> ';'
22 | '(' Type ',' Type ')'