with Ada.Containers.Vectors; generic Min_Valid : Candidates.CandidateID; Max_Valid : Candidates.CandidateID; package Bundles.Containers is package Bundle_Vectors is new Ada.Containers.Vectors (Index_Type => Positive, Element_Type => Bundle); subtype Bundle_Vector is Bundle_Vectors.Vector; subtype Valid_CandidateID is Candidates.CandidateID range Min_Valid .. Max_Valid; type Bundle_Collection is array (Valid_CandidateID) of Bundle_Vector; procedure Read_Bundles (Filename : in String; Result : out Bundle_Collection); end Bundles.Containers;