M2compiler-V1/tests/t_arith.mod

MODULE TArith;
VAR x, y : INTEGER; ExitCode : INTEGER;
BEGIN
  x := 1 + 2 * 3 - 4 DIV 2;
  y := (x + 10) * 2 MOD 7;
  ExitCode := x + y
END TArith.