s_bad_elem.mod 78 B

12345
  1. MODULE SBadElem;
  2. VAR s : SET OF [0 .. 7];
  3. BEGIN
  4. s := {1, "a"}
  5. END SBadElem.