DEFINITION MODULE HDImages; FROM SYSTEM IMPORT ADDRESS; TYPE Images = (Disk, OpenDisk, HardDisk, BackUp, HBackUp, Restore, HRestore); VAR Imgwidth :ARRAY Images OF INTEGER; Imgheight :ARRAY Images OF INTEGER; ImageDatas :ARRAY Images OF ADDRESS; END HDImages.