t_bad_bounds.mod 77 B

1234
  1. MODULE TBadBounds;
  2. TYPE Bad = ARRAY [5..1] OF INTEGER;
  3. BEGIN
  4. END TBadBounds.