1package Opt74_Pkg is
2
3   A : array (1 .. 10) of Integer := (others => 0);
4
5   procedure Proc (Found : out Integer; Index : out Integer);
6
7end Opt74_Pkg;
8