t_bad_bool.mod 77 B

1234
  1. MODULE TBool;
  2. VAR x, y : INTEGER; b : BOOLEAN;
  3. BEGIN b := x AND y
  4. END TBool.