MODULE TBadBigConst; (* Dynamic range-list sets have no static CONST layout yet. *) TYPE CS = SET OF CARDINAL; CONST c = CS{1, 3}; BEGIN END TBadBigConst.