1 files changed, 4 insertions, 4 deletions
diff --git a/src/bundles-containers.ads b/src/bundles-containers.ads
index 1982693..8caf263 100644
--- a/src/bundles-containers.ads
+++ b/src/bundles-containers.ads
@@ -6,19 +6,19 @@ with
 
 
 generic
-    type Candidate_Range is range <>;
+    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;
 
 
-    type Bundle_Collection is array (Candidate_Range) of Bundle_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