SUBT
case SUBT:
case SUBT:
OR, AND, ADD, SUBT, MULT, DIV, REM, MCH,
OR, AND, ADD, SUBT, MULT, DIV, REM, MCH,
case SUBT:
%token OR AND ADD SUBT MULT DIV REM EQ GT GEQ LT LEQ NEQ
%left ADD SUBT
| expr SUBT expr { $$ = arith(SUBT, $1, $3); }