type Container is array (Positive range <>) of Element; for Item of Container loop Do_Something(Item); end loop;