MODULE TBadManyDims; TYPE Big = ARRAY [0..1, 0..1, 0..1, 0..1, 0..1, 0..1, 0..1, 0..1, 0..1] OF INTEGER; BEGIN END TBadManyDims.